blob: 662dbb683cec1865d37a86e87ff9df711a411ebe (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
#!/usr/bin/install-menu
# -*- mode: shell-script; -*-
#I need menu-1!
#
#NOTE: the first line of this script _must_ be
# equal to "#!/usr/bin/install-menu", otherwise update-menus
# will feed this script old-compat-mode data.
#
#More info: /usr/share/doc/menu/html.
#
compat="menu-1"
!include menu.h
compat="menu-2"
function mod($var,$com)=" " $var " \""
title() ifnempty($hotkey,"&" toupper($hotkey))
"\" exec " $com "\n";
function ex($com)=mod("Exec",$com);
supported;
asmodule= mod("Module", $command);
fvwmmodule= mod("Exec", $command);
wm= mod("Restart",$command);
x11fvwm= ex($command);
x11= ex($command);
text= ex(term());
endsupported;
startmenu= "PopUp \"" $section "\"\n Title \"" title() "\"\n";
endmenu= ifempty(title(),
" Popup \"Exit\" Quit-Verify\n" )
"EndPopUp\n";
#very clever endmenu! (hadn't thought of doing it like that myself).
submenutitle=" Popup \"" title() cond_surr(icon(),"%","%") "\""
$section "\n";
genmenu= "menudefs.hook";
rootprefix="/etc/X11/afterstep/";
userprefix=".afterstep/";
mainmenutitle="Debian Menu";
|