[Fvwm-crystal-commits] SF.net SVN: fvwm-crystal:[842] fvwm/components/functions

[<dom...@us...>]

Revision: 842
          http://sourceforge.net/p/fvwm-crystal/code/842
Author:   dominique_libre
Date:     2015-12-30 20:28:28 +0000 (Wed, 30 Dec 2015)
Log Message:
-----------
AnimatedMove: the windows must be entirely into the screen

Modified Paths:
--------------
    ChangeLog
    fvwm/components/functions/Numpad

Modified: ChangeLog
===================================================================
--- ChangeLog	2015-12-30 16:20:15 UTC (rev 841)
+++ ChangeLog	2015-12-30 20:28:28 UTC (rev 842)
@@ -13,6 +13,7 @@
   Alt + G replace Alt + P (Music-GUI)
   bindings/Misc-Keybindings*: make each menu shortcuts to show both menus.
   asciidoc/*: update with last changes.
+  functions/Numpad: the windows must be entirely into the screen.
 
 mardi 29 décembre 2015
   functions/Mixer: commented show the sound card into the volume tooltip.

Modified: fvwm/components/functions/Numpad
===================================================================
--- fvwm/components/functions/Numpad	2015-12-30 16:20:15 UTC (rev 841)
+++ fvwm/components/functions/Numpad	2015-12-30 20:28:28 UTC (rev 842)
@@ -20,11 +20,11 @@
 
 DestroyFunc Window-Warp-CenterCenter
 AddToFunc Window-Warp-CenterCenter
-+ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] / 2 - $[w.width] / 2`p `expr $[vp.height] / 2 - $[w.height] / 2`p'
++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[wa.width] / 2 - $[w.width] / 2`p `expr $[wa.height] / 2 - $[w.height] / 2`p'
 
 DestroyFunc Window-Warp-LeftCenter
 AddToFunc Window-Warp-LeftCenter
-+ I Current Piperead 'echo Window-MPAnimatedMove $[EWMH_BS_Panel_Left]p `expr $[vp.height] / 2 - $[w.height] / 2`p'
++ I Current Piperead 'echo Window-MPAnimatedMove $[EWMH_BS_Panel_Left]p `expr $[wa.height] / 2 - $[w.height] / 2`p'
 
 DestroyFunc Window-Warp-LeftTop
 AddToFunc Window-Warp-LeftTop
@@ -32,26 +32,26 @@
 
 DestroyFunc Window-Warp-CenterTop
 AddToFunc Window-Warp-CenterTop
-+ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] / 2 - $[w.width] / 2`p $[EWMH_BS_Panel_Top]p'
++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[wa.width] / 2 - $[w.width] / 2`p $[EWMH_BS_Panel_Top]p'
 
 DestroyFunc Window-Warp-RightTop
 AddToFunc Window-Warp-RightTop
-+ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] - $[EWMH_BS_Panel_Right] - $[w.width]`p $[EWMH_BS_Panel_Top]p'
++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[wa.width] - $[w.width]`p $[EWMH_BS_Panel_Top]p'
 
 DestroyFunc Window-Warp-RightCenter
 AddToFunc Window-Warp-RightCenter
-+ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] - $[EWMH_BS_Panel_Right] - $[w.width]`p `expr $[vp.height] / 2 - $[w.height] / 2`p'
++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[wa.width] - $[w.width]`p `expr $[wa.height] / 2 - $[w.height] / 2`p'
 
 DestroyFunc Window-Warp-CenterBottom
 AddToFunc Window-Warp-CenterBottom
-+ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] / 2 - $[w.width] / 2`p `expr $[vp.height] - $[EWMH_BS_Panel_Bottom] - $[w.height]`p'
++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[wa.width] / 2 - $[w.width] / 2`p `expr $[vp.height] - $[EWMH_BS_Panel_Bottom] - $[w.height]`p'
 
 DestroyFunc Window-Warp-LeftBottom
 AddToFunc Window-Warp-LeftBottom
-+ I Current Piperead 'echo Window-MPAnimatedMove $[EWMH_BS_Panel_Left]p `expr $[vp.height] - $[EWMH_BS_Panel_Bottom] - $[w.height]`p'
++ I Current Piperead 'echo Window-MPAnimatedMove $[EWMH_BS_Panel_Left]p `expr $[wa.height] - $[w.height]`p'
 
 DestroyFunc Window-Warp-RightBottom
 AddToFunc Window-Warp-RightBottom
-+ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] - $[EWMH_BS_Panel_Right] - $[w.width]`p `expr $[vp.height] - $[EWMH_BS_Panel_Bottom] - $[w.height]`p'
++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[wa.width] - $[w.width]`p `expr $[wa.height] - $[w.height]`p'
 
 # vim:ft=fvwm

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.