#!/usr/sbin/install-menu
#
# Generates waimea menus for all registered applications.
# (taken from fluxbox)

!include menu.h
compat="menu-1";
outputencoding="ISO-8859-1"

genmenu="menu"
rootprefix="/etc/X11/waimea/"
userprefix=".waimea/"
treewalk="M)"
#rootsection="/Debian"

function mytitle()=esc(title(), "()") 
function mycom($com)="{" esc($com, "{}\"")  "}"
function entry($item,$com)= \
  nstring(level(), "   ") "[" $item"] (" mytitle() ") " $com "\n"

supported
    x11=    entry("item", mycom($command))
    text=   entry("item", mycom(term()))
    wm=	    entry("restart", mycom($command))
    waimea= entry($command, "")
    waimea-sub= entry("sub", "<!" $command ">\n"
endsupported

preoutput= \
  "# Automatically generated file. Do not edit (see /usr/share/doc/menu/README)\n\n\n\n!Debian MENU\n\n[start](rootmenu)\n[title] (Debian)\n"
postoutput= \
   "\n!Debian END\n \
   !\n \
   ! Window Menu\n \
   !\n \
   [start] (window)\n \
    [title] (Window Menu)\n \
    [checkbox=MAXIMIZED]      @FALSE (Maximized)        \"maximize\"       @TRUE (Maximized)          \"unmaximize\"\n \
    [checkbox=SHADED]         @FALSE (Shaded)           \"shade\"            @TRUE (Shaded)           \"unshade\"\n \
    [checkbox=STICKY]         @FALSE (Sticky)           \"sticky\"           @TRUE (Sticky)           \"unsticky\"\n \
    [checkbox=ALWAYSONTOP]    @FALSE (Always On Top)    \"alwaysontopon\"    @TRUE (Always On Top)    \"alwaysontopoff\"\n \
    [checkbox=ALWAYSATBOTTOM] @FALSE (Always At Bottom) \"alwaysatbottomon\" @TRUE (Always At Bottom) \"alwaysatbottomoff\"\n \
    [checkbox=DECORTITLE]     @FALSE (Titlebar)         \"decortitleon\"     @TRUE (Titlebar)         \"decortitleoff\"\n \
    [checkbox=DECORHANDLE]    @FALSE (Handlebar)        \"decorhandleon\"    @TRUE (Handlebar)        \"decorhandleoff\"\n \
    [checkbox=DECORBORDER]    @FALSE (Border)           \"decorborderon\"    @TRUE (Border)           \"decorborderoff\"\n \
    [checkbox=DECORALL]       @FALSE (All Decorations)  \"decorallon\"       @TRUE (All Decorations)  \"decoralloff\"\n \
    [item]  (Raise)       \"raise\"\n \
    [item]  (Lower)       \"lower\"\n \
    [item]  (Kill Client) \"kill\"\n \
    [item]  (Close)       \"close\"\n \
   [end]"

startmenu= ""
submenutitle= entry("submenu",mycom($longtitle))

# by harnir: removed 'restart' and 'exit' entries
# which are now in WindowManagers menu
endmenu= nstring(level(), "   ") ifeq(level(), "0", " ") "[end]\n"
