how to make a programs menu in sawfish

i could never find on the net how to get sawfish to display the programs i use the most when i middle click the desktop -> Programs. I had to look in some of the Debian sawfish lisp files on how to..



i have this saved as ~/.sawfish/lisp/my-menu.jl :

(require 'sawfish.wm.menus)
(defvar my-menu
(list
'("GnomeTerminal" (system "exec gnome-terminal &"))
'("Powershell" (system "exec powershell &"))
'("Galeon" (system "exec galeon --new-tab &"))
'("Evolution" (system "exec evolution &"))
'("Gaim" (system "exec gaim &"))
'("XChat" (system "exec xchat &"))
'("GnomeICU" (system "exec gnomeicu -a &"))
'("XMMS" (system "exec xmms &"))
'("Gnome CD Player" (system "exec gtcd &"))
'("LogJam" (system "exec logjam &"))
'("GnomeControlCenter" (system "exec gnomecc &"))
))


and then in ~/.sawfishrc i put this:

(require 'my-menu)
(setq apps-menu my-menu)