Imported Debian version 2.1.46debian/2.1.46

1 files changed, 34 insertions, 0 deletions

diff --git a/examples/twm b/examples/twm
new file mode 100755
index 0000000..f12f29f
--- /dev/null
+++ b/examples/twm
@@ -0,0 +1,34 @@
+#!/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 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(),"\""));
+#  x11 = "  \"" $title "\"    f.exec  \""$command " &\"\n";
+#  text= "  \"" $title "\"    f.exec  \"xterm -title \\\""
+#               $title "\\\" -e " esc($command,"\"") " &\"\n";
+endsupported;
+startmenu=   "menu \"" $section "\"\n{\n";
+endmenu=     "}\n";
+submenutitle="  \"" title() "\" f.menu \"" $section "\"\n";
+genmenu=      "menudefs.hook";
+rcfile=       "system.twmrc";
+examplercfile="system.twmrc-menu";
+rootprefix=   "/etc/X11/twm/";
+userprefix=   "/.twm/";