ChangeLog entry for previous commits.
[fvwm-themes.git] / menu-system / fvwm_themes.in
blob37f13f11f4ea1833cd75e5d53637b57df517be1e
1 #!/usr/sbin/install-menu
2 compat="menu-1"
3 !include menu.h
4 !include fvwm_themes.h
7 # You may want to edit (in fvwm_themes.h) the ftFindBestIcon and 
8 # ftFindBestSectionIcon as well as the ftFindSystemMiniIcon. 
11 #function ltitle()=translate(lang(),title())
12 function ltitle()=translate($lang,title())
14 supported
15   wm =  "+ \"" escfirst(ltitle(), $hotkey,"&") \
16     cond_surr(ftFindBestIcon($icon,$package,$section,$command,$title,"menu/"),\
17         "%","%") \
18     "\" Restart " $command "\n"
19   FvwmModule =  "+ \"" escfirst(ltitle(),$hotkey,"&") \
20     cond_surr(ftFindBestIcon($icon,$package,$section,$command,$title,"menu/"),\
21               "%","%") \
22     "\" Module " $command "\n"
23   FvwmThemes =  "+ \"" escfirst(ltitle(),$hotkey,"&") \
24     cond_surr(ftFindBestIcon($icon,$package,$section,$command,$title,"menu/"),\
25               "%","%") \
26     "\" " $command "\n"
27   fvwm2=  "+ \"" escfirst(ltitle(),$hotkey,"&") \
28     cond_surr(ftFindBestIcon($icon,$package,$section,$command,$title,"menu/"),\
29         "%","%") \
30     "\" " $command "\n"
31   x11 = "+ \"" escfirst(ltitle(),$hotkey,"&") \
32     cond_surr(ftFindBestIcon($icon,$package,$section,$command,$title,"menu/"),\
33               "%","%") \
34     "\" Exec    " $command  "\n"
35   text = "+ \"" escfirst(ltitle(),$hotkey,"&") \
36     cond_surr(ftFindBestIcon($icon,$package,$section,$command,$title,"menu/"),\
37               "%","%") \
38     "\""  " Exec /usr/bin/X11/xterm -T \"" ltitle() "\" -e " $command "\n"
39 endsupported
41 startmenu=   "DestroyMenu \"" replacewith($section, " ", "_") "\"" "\n" \
42              "AddToMenu \"" replacewith($section, " ", "_") "\"" \
43              " \"" ltitle() "\" Title" "\n"
44 endmenu=     "\n"
47 submenutitle= "+ \"" escfirst(ltitle() ,$hotkey,"&") \
48         cond_surr(ftFindBestSectionIcon($section,$icon,"menu/"),"%","%") \
49         "\" PopUp \"" replacewith($section, " ", "_") "\"\n"
51 rootprefix="xFT_DATADIRx/menu-system"
52 userprefix="/.fvwm/menu-system"
53 treewalk="c(m)"
54 genmenu="ft-menu"
55 rootsection="MenuFvwmMenuSystem"