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

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

Revision: 244
          http://sourceforge.net/p/fvwm-crystal/code/244
Author:   dominique_libre
Date:     2013-04-16 19:30:43 +0000 (Tue, 16 Apr 2013)
Log Message:
-----------
New preferences Silent operations which redirect stdr to /dev/null

Modified Paths:
--------------
    ChangeLog
    fvwm/components/functions/Colorsets
    fvwm/components/functions/Preferences
    fvwm/components/functions/Preferences-Menu
    fvwm/components/functions/Wallpaper
    fvwm/components/functions/Window-Decorations

Modified: ChangeLog
===================================================================
--- ChangeLog	2013-04-16 16:04:17 UTC (rev 243)
+++ ChangeLog	2013-04-16 19:30:43 UTC (rev 244)
@@ -1,5 +1,13 @@
 ChangeLog for FVWM-Crystal
 
+Mardi 16 Avril 2013 Dominique Michel
+  funcctions/Preferences; functions/Preferences-Menu; functions/Wallpaper;
+  functions/Window-Decorations; functions/Colorsets: New Silent operation
+  preferences. If enabled, it will redirect stdr to /dev/null for
+  all applications launched via the functions in Exec-Accelerator.
+  As a side effect, SavePreferences support now space into the file names
+  for all the related preferences inclusive WallpaperSet.
+
 Lundi 15 Avril 2013 Dominique Michel
 
 + Export.README: Free Export Regulations rules

Modified: fvwm/components/functions/Colorsets
===================================================================
--- fvwm/components/functions/Colorsets	2013-04-16 16:04:17 UTC (rev 243)
+++ fvwm/components/functions/Colorsets	2013-04-16 19:30:43 UTC (rev 244)
@@ -10,7 +10,7 @@
 AddToFunc Colorsets-Set
 + I Read $*
 + I UpdateStyles
-+ I SavePreferences LastChoosenColorset "Colorsets-Set \"$*\""
++ I SavePreferences LastChoosenColorset "Colorsets-Set $*"
 
 
 DestroyMenu /Colorsets

Modified: fvwm/components/functions/Preferences
===================================================================
--- fvwm/components/functions/Preferences	2013-04-16 16:04:17 UTC (rev 243)
+++ fvwm/components/functions/Preferences	2013-04-16 19:30:43 UTC (rev 244)
@@ -17,7 +17,7 @@
 #
 DestroyFunc SavePreferences
 AddToFunc SavePreferences
-+ I Exec echo $1 > $[FVWM_USERDIR]/preferences/$0
++ I Exec echo "$1" > $[FVWM_USERDIR]/preferences/$0
 
 # Modification of SavePreferences: add more lines to the preferences file
 # Must be used in conjonction with Schedule or the synchronization will be lost

Modified: fvwm/components/functions/Preferences-Menu
===================================================================
--- fvwm/components/functions/Preferences-Menu	2013-04-16 16:04:17 UTC (rev 243)
+++ fvwm/components/functions/Preferences-Menu	2013-04-16 19:30:43 UTC (rev 244)
@@ -19,6 +19,7 @@
 + '$[gt.Privileged terminals]'	Popup /Preferences/PrivilegedTerminals
 + "" Nop
 + '$[gt.Generate application menu]'	GenerateApplicationMenu
++ '$[gt.Silent operations]'	Popup /Preferences/SilentOps
 
 #
 # Used recipe
@@ -40,7 +41,7 @@
 DestroyFunc Recipe-Set
 AddToFunc Recipe-Set
 + I SetEnv Fvwm_Crystal_Recipe "$*"
-+ I SavePreferences LastChoosenRecipe "SetEnv Fvwm_Crystal_Recipe \"$*\""
++ I SavePreferences LastChoosenRecipe "SetEnv Fvwm_Crystal_Recipe $*"
 + I Module FvwmForm Recipe-Restart-Dialog
 
 All (Recipe-Restart-Dialog) Close
@@ -475,5 +476,23 @@
 + I *Pref-Warning-Dialog: Line center
 + I Module FvwmForm Pref-Warning-Dialog
 
+#
+# Silent operations
+#
 
+DestroyMenu /Preferences/SilentOps
+AddToMenu /Preferences/SilentOps
++ '$[gt.On]'	SetSilentOps
++ '$[gt.Off]'	UnsetSilentOps
+
+DestroyFunc SetSilentOps
+AddToFunc SetSilentOps
++ I SavePreferences SilentOps "InfoStoreAdd SILENT \'2>/dev/null\'"
++ I Schedule 333 Include components/functions/Exec-Accelerator
+
+DestroyFunc UnsetSilentOps
+AddToFunc UnsetSilentOps
++ I SavePreferences SilentOps "InfoStoreAdd SILENT \' \'"
++ I Schedule 333 Include components/functions/Exec-Accelerator
+
 # vim:ft=fvwm

Modified: fvwm/components/functions/Wallpaper
===================================================================
--- fvwm/components/functions/Wallpaper	2013-04-16 16:04:17 UTC (rev 243)
+++ fvwm/components/functions/Wallpaper	2013-04-16 19:30:43 UTC (rev 244)
@@ -7,7 +7,7 @@
 + I Test (x Esetroot) Exec Esetroot -scale $*
 + I TestRc (NoMatch) Test (x hsetroot) Exec hsetroot -fill $*
 + I TestRc (NoMatch) Test (x feh) Exec feh --bg-scale --no-fehbg $*
-+ I SavePreferences LastChoosenWallpaper "Wallpaper-Set \"$*\""
++ I SavePreferences LastChoosenWallpaper "Wallpaper-Set $*"
 
 # Select random wallpaper from given directories and set it
 DestroyFunc Wallpaper-Random

Modified: fvwm/components/functions/Window-Decorations
===================================================================
--- fvwm/components/functions/Window-Decorations	2013-04-16 16:04:17 UTC (rev 243)
+++ fvwm/components/functions/Window-Decorations	2013-04-16 19:30:43 UTC (rev 244)
@@ -12,11 +12,11 @@
 AddToFunc Window-Decorations-Set
 + I Test (f '$0/$[Window_Decorations_ButtonModel]') Read '$0/$[Window_Decorations_ButtonModel]'
 #+ I TestRc (Match) KeepRc Include components/styles/Window-Decorations
-+ I TestRc (Match) KeepRc SavePreferences LastChoosenWindowDecoration "Window-Decorations-Set \"$*\""
++ I TestRc (Match) KeepRc SavePreferences LastChoosenWindowDecoration "Window-Decorations-Set $*"
 + I TestRc (NoMatch) KeepRc FindFile Window_Decorations_ButtonModel-Temp '$0' Theme.nextstep Theme.os2 Theme.macosx Theme.windows Theme.amigaos Theme.fvwm-crystal
 + I TestRc (NoMatch) Test (f '$0/$[Window_Decorations_ButtonModel-Temp]') Read '$0/$[Window_Decorations_ButtonModel-Temp]'
 #+ I TestRc (Match) KeepRc Include components/styles/Window-Decorations
-+ I TestRc (Match) KeepRc SavePreferences LastChoosenWindowDecoration "Window-Decorations-Set \"$*\""
++ I TestRc (Match) KeepRc SavePreferences LastChoosenWindowDecoration "Window-Decorations-Set $*"
 + I UnsetEnv Window_Decorations_ButtonModel-Temp
 
 
@@ -62,7 +62,7 @@
 DestroyFunc Window-Decorations-SetButtonModel
 AddToFunc Window-Decorations-SetButtonModel
 + I SetEnv Window_Decorations_ButtonModel "$*"
-+ I SavePreferences LastChoosenButtonModel "SetEnv Window_Decorations_ButtonModel \"$*\""
++ I SavePreferences LastChoosenButtonModel "SetEnv Window_Decorations_ButtonModel '$*'"
 + I LoadPreferences LastChoosenWindowDecoration
 
 # vim:ft=fvwm

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