# Stuff to handle pretty pictures on the background.
SetEnv SETROOT "fvwm-root -r"
-SetEnv BGFILE "$[FVWM_USERDIR]/wallpaper$[screen].png"
+SetEnv BGFILE "$[FVWM_USERDIR]/.state/wallpaper$[screen].png"
SetEnv BGROOT "$[HOME]/wallpaper"
CopyMenuStyle * MenuWallpaper
-MenuStyle MenuWallpaper ItemFormat "%.2|%5.5c%2.3>%1|"
+MenuStyle MenuWallpaper ItemFormat "%.2|%5.5c%-16.3>%1|"
DestroyMenu MenuWallpaper
AddToMenu MenuWallpaper
AddToFunc MakeMenuWallpaper
+ I DestroyMenu recreate MenuWallpaper
+ I AddToMenu MenuWallpaper Wallpaper Title
- + I PipeRead '. $[FVWM_USERDIR]/scripts/bgmenu.sh $[BGROOT] MenuWallpaper'
+ + I PipeRead 'exec $[FVWM_USERDIR]/scripts/bgmenu.zsh $[BGROOT] MenuWallpaper'
DestroyFunc SetWallpaper
AddToFunc SetWallpaper
+ I Exec exec ln -sf "$0" "$[BGFILE]"
+ I Exec exec $[SETROOT] "$[BGFILE]"
-AddToFunc InitFunction
- + I Exec exec $[SETROOT] "$[BGFILE]"
+DestroyFunc SetInitialWallpaper
+AddToFunc SetInitialWallpaper
+ + I Exec if [ -f "$[BGFILE]" ]; then \
+ $[SETROOT] "$[BGFILE]"; \
+ else \
+ $[SETROOT] "$($[FVWM_USERDIR]/scripts/randombg.pl $[BGROOT])"; \
+ fi
+
+AddToFunc InitFunction I SetInitialWallpaper
+AddToFunc SessionInitFunction I SetInitialWallpaper