Главная   Изменения   Спек   Патчи   Исходники   Загрузить   Gear   Bugs and FR  Repocop 

#!/usr/sbin/install-menu

!include menu.h

compat="menu-1"

outputencoding="UTF-8"
genmenu="menu.xml"
rootprefix="/etc/X11/jwm/"
userprefix=".jwm/"
treewalk="(M)"

function xml_escape($s) = replace(replace(replace(replace(replace($s, \
				"&",  "&"), \
				">",  ">"), \
				"<",  "&lt;"), \
				"'",  "&apos;"), \
				"\"", "&quot;")

supported
    x11=     nstring(level(), "  ") "<Program icon=\"" ifnempty($icon,$icon) "\" label=\"" xml_escape(title()) "\">" $command "</Program>\n"
    text=    nstring(level(), "  ") "<Program icon=\"" ifnempty($icon,$icon) "\" label=\"" xml_escape(title()) "\">" term()   "</Program>\n"
    wm=      nstring(level(), "  ") "<Program icon=\"" ifnempty($icon,$icon) "\" label=\"" xml_escape(title()) "\">" $command "</Program>\n"
endsupported

startmenu=   nstring(level(), "  ")  "<Menu icon=\"" ifelse($icon,$icon,"altlinux.png") "\" label=\"" xml_escape(title()) "\">\n"
endmenu=     nstring(level(), "  ")  "</Menu>\n"

preoutput=   "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\n<JWM>\n"
postoutput=  "\n<Separator/>\n<Restart icon=\"reload.png\" label=\"Restart\"/>\n<Exit icon=\"exit.png\" label=\"Exit\" confirm=\"true\"/>\n</JWM>\n"