1 # Stuff to handle pretty pictures on the background.
2 SetEnv SETROOT "fvwm-root -r"
3 SetEnv BGFILE "$[FVWM_USERDIR]/wallpaper$[screen].png"
4 SetEnv BGROOT "$[HOME]/wallpaper"
6 CopyMenuStyle * MenuWallpaper
7 MenuStyle MenuWallpaper ItemFormat "%.2|%5.5c%2.3>%1|"
9 DestroyMenu MenuWallpaper
10 AddToMenu MenuWallpaper
11 + DynamicPopupAction MakeMenuWallpaper
12 ChangeMenuStyle MenuWallpaper MenuWallpaper
14 DestroyFunc MakeMenuWallpaper
15 AddToFunc MakeMenuWallpaper
16 + I DestroyMenu recreate MenuWallpaper
17 + I AddToMenu MenuWallpaper Wallpaper Title
18 + I PipeRead '. $[FVWM_USERDIR]/bgmenu.sh $[BGROOT] MenuWallpaper'
20 DestroyFunc SetWallpaper
21 AddToFunc SetWallpaper
22 + I Exec exec ln -sf "$0" "$[BGFILE]"
23 + I Exec exec $[SETROOT] "$[BGFILE]"
25 AddToFunc InitFunction
26 + I Exec exec $[SETROOT] "$[BGFILE]"