#!/usr/bin/install-menu
#   -*- mode: shell-script; -*-
#I need menu-1.4!
#
#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 f($com)="  \"" title() "\"    f.exec  \""$com " &\"\n";

#This doens't seem to be possible with twm:  wm="f.restart \"${title}\"\\n"
supported;
  x11= f($command);
  text=f(esc(term(),"\""));
endsupported;

startmenu=   "menu \"" $section "\"\n{\n";
endmenu=     "}\n";
submenutitle="  \"" title() "\" f.menu \"" $section "\"\n";
genmenu=      "menudefs.hook";
rcfile=       "system.ctwmrc";
examplercfile="system.ctwmrc-menu";
rootprefix=   "/etc/X11/ctwm/";
userprefix=   "/.ctwm/";
