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
|
#!/usr/sbin/install-menu
# $Id: menu-method 14 2004-12-27 21:13:49Z branden $
compat="menu-1"
!include menu.h
compat="menu-2"
# q($arg): backslash-escape double quotes in $arg
function q($com) = esc($com,"\"");
# apply($command, $action): run $command using window manager function $action
function apply($com, $action) = " \"" q(title()) "\" " $action " \"" q($com) "\"\n";
supported;
x11 = apply($command, "f.exec");
text = apply(term(), "f.exec");
wm = apply($command, "f.startwm");
endsupported;
startmenu= "menu \"" $section "\"\n{\n";
endmenu= "}\n";
submenutitle=" \"" title() "\" f.menu \"" $section "\"\n";
genmenu= "menudefs.hook";
rcfile= "system.vtwmrc";
examplercfile="system.vtwmrc-menu";
rootprefix= "/etc/X11/vtwm/";
userprefix= "/.vtwm/";
# vim:set ai et sts=4 sw=4 tw=80:
|
