From: <dom...@us...> - 2015-10-18 13:00:39
|
Revision: 748 http://sourceforge.net/p/fvwm-crystal/code/748 Author: dominique_libre Date: 2015-10-18 13:00:36 +0000 (Sun, 18 Oct 2015) Log Message: ----------- Fix moving of FS window in SetGeometry Modified Paths: -------------- ChangeLog fvwm/components/functions/Preferences-Menu Modified: ChangeLog =================================================================== --- ChangeLog 2015-10-18 12:57:33 UTC (rev 747) +++ ChangeLog 2015-10-18 13:00:36 UTC (rev 748) @@ -6,6 +6,7 @@ Dimanche 18 octobre 2015 decorations/Elberg/Default/Theme.*, decorations/Ish/*/Colorsets: fix missing Shadow and Handles style. + functions/Preferences-Menu: Fix moving of FS window in SetGeometry. Jeudi 15 octobre 2015 functions/Preferences-Menu: Fix SelectDefaultTerminal to work the first time it is called; Modified: fvwm/components/functions/Preferences-Menu =================================================================== --- fvwm/components/functions/Preferences-Menu 2015-10-18 12:57:33 UTC (rev 747) +++ fvwm/components/functions/Preferences-Menu 2015-10-18 13:00:36 UTC (rev 748) @@ -99,7 +99,8 @@ AddToFunc SetGeometry + I InfoStoreAdd OldX $[infostore.Desk_Pages_X] + I InfoStoreAdd Desk_Pages_X $0 -+ I PipeRead 'last=$(( $0-1)); old=$(( $[infostore.OldX]-1 )); if [ $last -lt $old ]; then for page in $(seq $0 $old); do echo "GotoPage $page 0"; echo "All (CurrentPage) MoveToPage $last 0"; for file in /tmp/fullscreen.??.0x???????.$page.0.tmp; do new=$(echo $file | sed -e "s:$page.0:$last.0:"); mv $file $new 2>/dev/null; done; done; fi' +# The page number in FVWM begin at 0 ++ I PipeRead 'last=$(( $0-1)); old=$(( $[infostore.OldX]-1 )); if [ $last -lt $old ]; then for page in $(seq $0 $old); do echo "GotoPage $page 0"; echo \'All (CurrentPage) WindowStyle !FixedPosition\'; echo "UpdateStyles"; echo "All (CurrentPage) MoveToPage $last 0"; for file in $(ls /tmp/fullscreen.??.0x???????.$page.0.tmp 2>/dev/null); do new=$(echo $file | sed -e "s:$page.0:$last.0:"); mv $file $new 2>/dev/null; done; done; fi' + I InfoStoreRemove OldX + I SavePreferences DeskPageX "InfoStoreAdd Desk_Pages_X $[0]" + I DesktopSize $[infostore.Desk_Pages_X]x$[infostore.Desk_Pages_Y] This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |