# return the wm-icons associated to a standard section. One can think that:
# 1 - it is better to use overread the /usr/lib/menu/menu file
# 2 - to add/replace some "ifeqelse lines" with parent($s) in the placs of $s
# both are bad ideas :o)
function wmIconsGetSectionIcon($s)= \
  ifeqelse($s,rootsection()"/Configuration",\
	"configuration.xpm",\
  ifeqelse($s,rootsection()"/Configuration/Hardware",\
	"disk.xpm",\
  ifeqelse($s,rootsection()"/Configuration/Packaging",\
	"programs.xpm",\
  ifeqelse($s,rootsection()"/Configuration/Networking",\
	"network.xpm",\
  ifeqelse($s,rootsection()"/Configuration/Printing",\
	"printing.xpm",\
  ifeqelse($s,rootsection()"/Configuration/Boot and Init",\
	"linux.xpm",\
  ifeqelse($s,rootsection()"/Configuration/Other",\
	"configuration.xpm",\
  ifeqelse($s,rootsection()"/Applications",\
	"programs.xpm",\
  ifeqelse($s,rootsection()"/Applications/Development",\
	"developement.xpm",\
  ifeqelse($s,rootsection()"/Applications/Development/Interpreters",\
	"developement.xpm",\
  ifeqelse($s,rootsection()"/Applications/Development/Code generators",\
	"developement.xpm",\
  ifeqelse($s,rootsection()"/Applications/Development/Development environments",\
	"developement.xpm",\
  ifeqelse($s,rootsection()"/Applications/Development/Tools",\
	"developement.xpm",\
  ifeqelse($s,rootsection()"/Applications/Sciences",\
	"science.xpm",\
  ifeqelse($s,rootsection()"/Applications/Archiving",\
	"file.xpm",\
  ifeqelse($s,rootsection()"/Applications/Archiving/Compression",\
	"file.xpm",\
  ifeqelse($s,rootsection()"/Applications/Archiving/Cd burning",\
	"disk-cd.xpm",\
  ifeqelse($s,rootsection()"/Applications/Archiving/Backup",\
	"folder.xpm",\
  ifeqelse($s,rootsection()"/Applications/Archiving/Other",\
	"file.xpm",\
  ifeqelse($s,rootsection()"/Applications/Communications",\
	"network.xpm",\	
  ifeqelse($s,rootsection()"/Applications/Editors",\
	"editor.xpm",\
  ifeqelse($s,rootsection()"/Applications/Publishing",\
	"word-processor.xpm",\
  ifeqelse($s,rootsection()"/Applications/Monitoring",\
	"monitoring.xpm",\
  ifeqelse($s,rootsection()"/Applications/Text tools",\
	"viewer.xpm",\
  ifeqelse($s,rootsection()"/Applications/File tools",\
	"file.xpm",\
  ifeqelse($s,rootsection()"/Applications/Shells",\
	"file.xpm",\
  ifeqelse($s,rootsection()"/Terminals",\
	"terminal.xpm",\
  ifeqelse($s,rootsection()"/Documentation",\
	"help.xpm",\
  ifeqelse($s,rootsection()"/Office",\
	"word-processor.xpm",\
  ifeqelse($s,rootsection()"/Networking",\
	"network.xpm",\
  ifeqelse($s,rootsection()"/Networking/File transfer",\
	"file.xpm",\
  ifeqelse($s,rootsection()"/Networking/ICQ",\
	"chat.xpm",\
  ifeqelse($s,rootsection()"/Networking/IRC",\
	"chat.xpm",\
  ifeqelse($s,rootsection()"/Networking/Chat",\
	"chat.xpm",\
  ifeqelse($s,rootsection()"/Networking/News",\
	"news.xpm",\
  ifeqelse($s,rootsection()"/Networking/Mail",\
	"mail.xpm",\
  ifeqelse($s,rootsection()"/Networking/WWW",\
	"www.xpm",\
  ifeqelse($s,rootsection()"/Networking/Remote access",\
	"network.xpm",\
  ifeqelse($s,rootsection()"/Networking/Other",\
	"network.xpm",\
  ifeqelse($s,rootsection()"/Amusement",\
	"game.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Adventure",\
	"game-action.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Arcade",\
	"game-action.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Boards",\
	"game-board.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Cards",\
	"game-cards.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Puzzles",\
	"game-logic.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Sports",\
	"game-action.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Strategy",\
	"game-action.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Other",\
	"game.xpm",\
  ifeqelse($s,rootsection()"/Amusement/Toys",\
	"amusement.xpm",\
  ifeqelse($s,rootsection()"/Multimedia",\
	"multimedia.xpm",\
  ifeqelse($s,rootsection()"/Multimedia/Sound",\
	"music.xpm",\
  ifeqelse($s,rootsection()"/Multimedia/Graphics",\
	"graphics.xpm",\
  ifeqelse($s,rootsection()"/Multimedia/Video",\
	"video.xpm",\
  ifeqelse($s,rootsection()"/Session",\
	"windows.xpm",\
  ifeqelse($s,rootsection()"/Session/Windowmanagers",\
	"windows.xpm",\
  "")))))))))))))))))))))))))))))))))))))))))))))))))))))))

# return a wm-icons associated to a package
# this function should be automatically generated:
function wmIconsFindIconByList($p) = \
  ifeqelse($p,"xemacs","gnu.xpm",\
  ifeqelse($p,"gqview","image-viewer.xpm",\
	   ""))
