#!/usr/sbin/install-menu
#   -*- mode: shell-script; -*-
#
compat="menu-1";
!include menu.h
compat="menu-2";

outputencoding="ISO-8859-1";

treewalk="M";
rootprefix="/etc/X11/ratmenu/";
userprefix=".ratmenu/";
mainmenutitle="Debian Menu";
rootsection="Debian";

function space()=" ";
function newline()="\n";
function quote($text)="'" escwith($text,"'","'\\'") "'";

function section()=parent($section);
function file($sec)=tolower(replacewith($sec,"/ '","...") ".menu");

function ratprevious()=" -back " ifeqelse(section(), "Debian", "''", prefix() file(parent(section())));

function ratcmd()=firstentry("ratmenu -style dreary -label " quote("/" section()) ratprevious()) space();

function exec($com)=ratcmd() quote(title()) space() quote(ifeq($needs, "text", "x-terminal-emulator -T \\\"" esc($title,"\\\"")  "\\\" -e ") $com);

genmenu=file(parent($section));
removemenu="set -e; rm -f " prefix()  "/debian*menu";

supported;
  x11=        exec($command);
  text=       exec($command);
endsupported;

startmenu="";
endmenu="";
submenutitle=ratcmd() quote($section"/") space() "'" prefix() file($section) "'";

prerun="set -e; rm -f " prefix()  "/debian*menu";
postrun="set -e; chmod a+x " prefix() "/debian*menu";
