#!/usr/bin/perl
use Gtk2 ('-init');
use threads ('yield', 'stack_size', 262144, 'exit', 'threads_only', 'stringify');
$icon = 'Gtk2::StatusIcon'->new;
$icon->set_from_stock('gtk-home');
$icon->set_visible(1);
$icon->signal_connect('button-release-event', sub {
show_icon_menu();
});
$icon->set_tooltip('Click for menu...');
sub show_icon_menu {
$menu = 'Gtk2::Menu'->new;
$item15 = 'Gtk2::MenuItem'->new(q[File Manager]);
$item15->show;
$item15->signal_connect('activate', sub {
'threads'->create(sub {
system q[thunar];
});}
);
$menu->append($item15);
$item16 = 'Gtk2::MenuItem'->new(q[Terminal]);
$item16->show;
$item16->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm];
});}
);
$menu->append($item16);
$item17 = 'Gtk2::MenuItem'->new(q[Web Browser]);
$item17->show;
$item17->signal_connect('activate', sub {
'threads'->create(sub {
system q[firefox];
});}
);
$menu->append($item17);
$item18 = 'Gtk2::MenuItem'->new(q[Text Editor]);
$item18->show;
$item18->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm -e nano];
});}
);
$menu->append($item18);
$separator = Gtk2::SeparatorMenuItem->new;
$menu->append($separator);
# # # # # # # # # # # # # # # # # # # # Accessories # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category0 = 'Gtk2::MenuItem'->new(q[Accessories]);
$about32 = 'Gtk2::MenuItem'->new(q[About GNOME]);
$about32->show;
$about32->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-about];
});}
);
$all_apps->append($about32);
$archive26 = 'Gtk2::MenuItem'->new(q[Archive Manager]);
$archive26->show;
$archive26->signal_connect('activate', sub {
'threads'->create(sub {
system q[file-roller];
});}
);
$all_apps->append($archive26);
$calculator27 = 'Gtk2::MenuItem'->new(q[Calculator]);
$calculator27->show;
$calculator27->signal_connect('activate', sub {
'threads'->create(sub {
system q[gcalctool];
});}
);
$all_apps->append($calculator27);
$catfish31 = 'Gtk2::MenuItem'->new(q[Catfish]);
$catfish31->show;
$catfish31->signal_connect('activate', sub {
'threads'->create(sub {
system q[catfish];
});}
);
$all_apps->append($catfish31);
$file23 = 'Gtk2::MenuItem'->new(q[File Manager]);
$file23->show;
$file23->signal_connect('activate', sub {
'threads'->create(sub {
system q[pcmanfm];
});}
);
$all_apps->append($file23);
$gedit29 = 'Gtk2::MenuItem'->new(q[gedit]);
$gedit29->show;
$gedit29->signal_connect('activate', sub {
'threads'->create(sub {
system q[gedit];
});}
);
$all_apps->append($gedit29);
$kupfer30 = 'Gtk2::MenuItem'->new(q[Kupfer]);
$kupfer30->show;
$kupfer30->signal_connect('activate', sub {
'threads'->create(sub {
system q[kupfer];
});}
);
$all_apps->append($kupfer30);
$panel24 = 'Gtk2::MenuItem'->new(q[Panel]);
$panel24->show;
$panel24->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-panel];
});}
);
$all_apps->append($panel24);
$root25 = 'Gtk2::MenuItem'->new(q[Root Terminal]);
$root25->show;
$root25->signal_connect('activate', sub {
'threads'->create(sub {
system q[gksu /usr/bin/x-terminal-emulator];
});}
);
$all_apps->append($root25);
$terminator28 = 'Gtk2::MenuItem'->new(q[Terminator]);
$terminator28->show;
$terminator28->signal_connect('activate', sub {
'threads'->create(sub {
system q[terminator];
});}
);
$all_apps->append($terminator28);
$tilda22 = 'Gtk2::MenuItem'->new(q[Tilda]);
$tilda22->show;
$tilda22->signal_connect('activate', sub {
'threads'->create(sub {
system q[tilda];
});}
);
$all_apps->append($tilda22);
$category0->set_submenu($all_apps);
$menu->append($category0);
# # # # # # # # # # # # # # # # # # # # Development # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category1 = 'Gtk2::MenuItem'->new(q[Development]);
$python35 = 'Gtk2::MenuItem'->new(q[Python (v2.6)]);
$python35->show;
$python35->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm -e /usr/bin/python2.6];
});}
);
$all_apps->append($python35);
$python36 = 'Gtk2::MenuItem'->new(q[Python (v2.5)]);
$python36->show;
$python36->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm -e /usr/bin/python2.5];
});}
);
$all_apps->append($python36);
$category1->set_submenu($all_apps);
$menu->append($category1);
# # # # # # # # # # # # # # # # # # # # Graphics # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category4 = 'Gtk2::MenuItem'->new(q[Graphics]);
$document41 = 'Gtk2::MenuItem'->new(q[Document Viewer]);
$document41->show;
$document41->signal_connect('activate', sub {
'threads'->create(sub {
system q[evince];
});}
);
$all_apps->append($document41);
$gcolor243 = 'Gtk2::MenuItem'->new(q[Gcolor2]);
$gcolor243->show;
$gcolor243->signal_connect('activate', sub {
'threads'->create(sub {
system q[gcolor2];
});}
);
$all_apps->append($gcolor243);
$gnu44 = 'Gtk2::MenuItem'->new(q[GNU Image Manipulation Program]);
$gnu44->show;
$gnu44->signal_connect('activate', sub {
'threads'->create(sub {
system q[gimp-2.6];
});}
);
$all_apps->append($gnu44);
$inkscape42 = 'Gtk2::MenuItem'->new(q[Inkscape]);
$inkscape42->show;
$inkscape42->signal_connect('activate', sub {
'threads'->create(sub {
system q[inkscape];
});}
);
$all_apps->append($inkscape42);
$libreoffice45 = 'Gtk2::MenuItem'->new(q[LibreOffice Draw]);
$libreoffice45->show;
$libreoffice45->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice -draw];
});}
);
$all_apps->append($libreoffice45);
$mirage47 = 'Gtk2::MenuItem'->new(q[Mirage]);
$mirage47->show;
$mirage47->signal_connect('activate', sub {
'threads'->create(sub {
system q[mirage];
});}
);
$all_apps->append($mirage47);
$viewnior46 = 'Gtk2::MenuItem'->new(q[Viewnior]);
$viewnior46->show;
$viewnior46->signal_connect('activate', sub {
'threads'->create(sub {
system q[viewnior];
});}
);
$all_apps->append($viewnior46);
$category4->set_submenu($all_apps);
$menu->append($category4);
# # # # # # # # # # # # # # # # # # # # Multimedia # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category5 = 'Gtk2::MenuItem'->new(q[Multimedia]);
$brasero52 = 'Gtk2::MenuItem'->new(q[Brasero]);
$brasero52->show;
$brasero52->signal_connect('activate', sub {
'threads'->create(sub {
system q[brasero];
});}
);
$all_apps->append($brasero52);
$mixer55 = 'Gtk2::MenuItem'->new(q[Mixer]);
$mixer55->show;
$mixer55->signal_connect('activate', sub {
'threads'->create(sub {
system q[xfce4-mixer];
});}
);
$all_apps->append($mixer55);
$outrec50 = 'Gtk2::MenuItem'->new(q[outRec]);
$outrec50->show;
$outrec50->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/bin/outrec.gambas];
});}
);
$all_apps->append($outrec50);
$sound54 = 'Gtk2::MenuItem'->new(q[Sound Recorder]);
$sound54->show;
$sound54->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-sound-recorder];
});}
);
$all_apps->append($sound54);
$vlc51 = 'Gtk2::MenuItem'->new(q[VLC media player]);
$vlc51->show;
$vlc51->signal_connect('activate', sub {
'threads'->create(sub {
system q[vlc];
});}
);
$all_apps->append($vlc51);
$xfburn53 = 'Gtk2::MenuItem'->new(q[Xfburn]);
$xfburn53->show;
$xfburn53->signal_connect('activate', sub {
'threads'->create(sub {
system q[xfburn];
});}
);
$all_apps->append($xfburn53);
$category5->set_submenu($all_apps);
$menu->append($category5);
# # # # # # # # # # # # # # # # # # # # Network # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category6 = 'Gtk2::MenuItem'->new(q[Network]);
$bluetooth65 = 'Gtk2::MenuItem'->new(q[Bluetooth]);
$bluetooth65->show;
$bluetooth65->signal_connect('activate', sub {
'threads'->create(sub {
system q[bluetooth-properties];
});}
);
$all_apps->append($bluetooth65);
$gftp66 = 'Gtk2::MenuItem'->new(q[gFTP]);
$gftp66->show;
$gftp66->signal_connect('activate', sub {
'threads'->create(sub {
system q[gftp];
});}
);
$all_apps->append($gftp66);
$google58 = 'Gtk2::MenuItem'->new(q[Google Chrome]);
$google58->show;
$google58->signal_connect('activate', sub {
'threads'->create(sub {
system q[/opt/google/chrome/google-chrome];
});}
);
$all_apps->append($google58);
$heybuddy62 = 'Gtk2::MenuItem'->new(q[Heybuddy - Identi.ca client]);
$heybuddy62->show;
$heybuddy62->signal_connect('activate', sub {
'threads'->create(sub {
system q[heybuddy];
});}
);
$all_apps->append($heybuddy62);
$iceweasel63 = 'Gtk2::MenuItem'->new(q[Iceweasel]);
$iceweasel63->show;
$iceweasel63->signal_connect('activate', sub {
'threads'->create(sub {
system q[iceweasel];
});}
);
$all_apps->append($iceweasel63);
$network60 = 'Gtk2::MenuItem'->new(q[Network Proxy]);
$network60->show;
$network60->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-network-properties];
});}
);
$all_apps->append($network60);
$network67 = 'Gtk2::MenuItem'->new(q[Network Connections]);
$network67->show;
$network67->signal_connect('activate', sub {
'threads'->create(sub {
system q[nm-connection-editor];
});}
);
$all_apps->append($network67);
$sun59 = 'Gtk2::MenuItem'->new(q[Sun Java 6 Web Start]);
$sun59->show;
$sun59->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/jvm/java-6-sun-1.6.0.26/bin/javaws];
});}
);
$all_apps->append($sun59);
$transmission61 = 'Gtk2::MenuItem'->new(q[Transmission]);
$transmission61->show;
$transmission61->signal_connect('activate', sub {
'threads'->create(sub {
system q[transmission];
});}
);
$all_apps->append($transmission61);
$xchat64 = 'Gtk2::MenuItem'->new(q[XChat IRC]);
$xchat64->show;
$xchat64->signal_connect('activate', sub {
'threads'->create(sub {
system q[xchat];
});}
);
$all_apps->append($xchat64);
$category6->set_submenu($all_apps);
$menu->append($category6);
# # # # # # # # # # # # # # # # # # # # Office # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category7 = 'Gtk2::MenuItem'->new(q[Office]);
$dictionary75 = 'Gtk2::MenuItem'->new(q[Dictionary]);
$dictionary75->show;
$dictionary75->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-dictionary];
});}
);
$all_apps->append($dictionary75);
$gnumeric71 = 'Gtk2::MenuItem'->new(q[Gnumeric]);
$gnumeric71->show;
$gnumeric71->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnumeric];
});}
);
$all_apps->append($gnumeric71);
$libreoffice70 = 'Gtk2::MenuItem'->new(q[LibreOffice Math]);
$libreoffice70->show;
$libreoffice70->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice -math];
});}
);
$all_apps->append($libreoffice70);
$libreoffice72 = 'Gtk2::MenuItem'->new(q[LibreOffice Calc]);
$libreoffice72->show;
$libreoffice72->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice -calc];
});}
);
$all_apps->append($libreoffice72);
$libreoffice73 = 'Gtk2::MenuItem'->new(q[LibreOffice Base]);
$libreoffice73->show;
$libreoffice73->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice -base];
});}
);
$all_apps->append($libreoffice73);
$libreoffice74 = 'Gtk2::MenuItem'->new(q[LibreOffice Impress]);
$libreoffice74->show;
$libreoffice74->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice -impress];
});}
);
$all_apps->append($libreoffice74);
$libreoffice76 = 'Gtk2::MenuItem'->new(q[LibreOffice Writer]);
$libreoffice76->show;
$libreoffice76->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice -writer];
});}
);
$all_apps->append($libreoffice76);
$libreoffice77 = 'Gtk2::MenuItem'->new(q[LibreOffice ]);
$libreoffice77->show;
$libreoffice77->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice];
});}
);
$all_apps->append($libreoffice77);
$category7->set_submenu($all_apps);
$menu->append($category7);
# # # # # # # # # # # # # # # # # # # # Others # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category8 = 'Gtk2::MenuItem'->new(q[Others]);
$abstractile93 = 'Gtk2::MenuItem'->new(q[Abstractile]);
$abstractile93->show;
$abstractile93->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/abstractile -root];
});}
);
$all_apps->append($abstractile93);
$autorun101 = 'Gtk2::MenuItem'->new(q[Autorun Prompt]);
$autorun101->show;
$autorun101->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus-autorun-software];
});}
);
$all_apps->append($autorun101);
$brasero80 = 'Gtk2::MenuItem'->new(q[Brasero]);
$brasero80->show;
$brasero80->signal_connect('activate', sub {
'threads'->create(sub {
system q[brasero -c];
});}
);
$all_apps->append($brasero80);
$computer97 = 'Gtk2::MenuItem'->new(q[Computer]);
$computer97->show;
$computer97->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus --no-desktop computer:];
});}
);
$all_apps->append($computer97);
$cwaves109 = 'Gtk2::MenuItem'->new(q[CWaves]);
$cwaves109->show;
$cwaves109->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/cwaves -root];
});}
);
$all_apps->append($cwaves109);
$deco107 = 'Gtk2::MenuItem'->new(q[Deco]);
$deco107->show;
$deco107->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/deco -root];
});}
);
$all_apps->append($deco107);
$distort106 = 'Gtk2::MenuItem'->new(q[Distort]);
$distort106->show;
$distort106->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/distort -root];
});}
);
$all_apps->append($distort106);
$execute103 = 'Gtk2::MenuItem'->new(q[Execute in Kupfer]);
$execute103->show;
$execute103->signal_connect('activate', sub {
'threads'->create(sub {
system q[kupfer-exec];
});}
);
$all_apps->append($execute103);
$fiberlamp99 = 'Gtk2::MenuItem'->new(q[Fiberlamp]);
$fiberlamp99->show;
$fiberlamp99->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/fiberlamp -root];
});}
);
$all_apps->append($fiberlamp99);
$file94 = 'Gtk2::MenuItem'->new(q[File Manager]);
$file94->show;
$file94->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus];
});}
);
$all_apps->append($file94);
$font111 = 'Gtk2::MenuItem'->new(q[Font Viewer]);
$font111->show;
$font111->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-font-viewer];
});}
);
$all_apps->append($font111);
$fuzzyflakes82 = 'Gtk2::MenuItem'->new(q[FuzzyFlakes]);
$fuzzyflakes82->show;
$fuzzyflakes82->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/fuzzyflakes -root];
});}
);
$all_apps->append($fuzzyflakes82);
$galaxy81 = 'Gtk2::MenuItem'->new(q[Galaxy]);
$galaxy81->show;
$galaxy81->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/galaxy -root];
});}
);
$all_apps->append($galaxy81);
$help110 = 'Gtk2::MenuItem'->new(q[Help]);
$help110->show;
$help110->signal_connect('activate', sub {
'threads'->create(sub {
system q[yelp];
});}
);
$all_apps->append($help110);
$home83 = 'Gtk2::MenuItem'->new(q[Home Folder]);
$home83->show;
$home83->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus --no-desktop];
});}
);
$all_apps->append($home83);
$libreoffice84 = 'Gtk2::MenuItem'->new(q[LibreOffice Small Device Format Importer]);
$libreoffice84->show;
$libreoffice84->signal_connect('activate', sub {
'threads'->create(sub {
system q[libreoffice -writer];
});}
);
$all_apps->append($libreoffice84);
$m650290 = 'Gtk2::MenuItem'->new(q[m6502]);
$m650290->show;
$m650290->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/m6502 -root];
});}
);
$all_apps->append($m650290);
$menu95 = 'Gtk2::MenuItem'->new(q[Menu Editor]);
$menu95->show;
$menu95->signal_connect('activate', sub {
'threads'->create(sub {
system q[gmenu-simple-editor];
});}
);
$all_apps->append($menu95);
$metaballs89 = 'Gtk2::MenuItem'->new(q[MetaBalls]);
$metaballs89->show;
$metaballs89->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/metaballs -root];
});}
);
$all_apps->append($metaballs89);
$metacity108 = 'Gtk2::MenuItem'->new(q[Metacity]);
$metacity108->show;
$metacity108->signal_connect('activate', sub {
'threads'->create(sub {
system q[metacity];
});}
);
$all_apps->append($metacity108);
$network91 = 'Gtk2::MenuItem'->new(q[Network]);
$network91->show;
$network91->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus --no-desktop network:];
});}
);
$all_apps->append($network91);
$open88 = 'Gtk2::MenuItem'->new(q[Open Folder]);
$open88->show;
$open88->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus --no-desktop];
});}
);
$all_apps->append($open88);
$openbox85 = 'Gtk2::MenuItem'->new(q[Openbox Session]);
$openbox85->show;
$openbox85->signal_connect('activate', sub {
'threads'->create(sub {
system q[openbox-session];
});}
);
$all_apps->append($openbox85);
$penrose96 = 'Gtk2::MenuItem'->new(q[Penrose]);
$penrose96->show;
$penrose96->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/penrose -root];
});}
);
$all_apps->append($penrose96);
$ripples102 = 'Gtk2::MenuItem'->new(q[Ripples]);
$ripples102->show;
$ripples102->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/ripples -root];
});}
);
$all_apps->append($ripples102);
$shadebobs105 = 'Gtk2::MenuItem'->new(q[ShadeBobs]);
$shadebobs105->show;
$shadebobs105->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/shadebobs -root];
});}
);
$all_apps->append($shadebobs105);
$slidescreen87 = 'Gtk2::MenuItem'->new(q[SlideScreen]);
$slidescreen87->show;
$slidescreen87->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/slidescreen -root];
});}
);
$all_apps->append($slidescreen87);
$sun92 = 'Gtk2::MenuItem'->new(q[Sun Java 6 Runtime]);
$sun92->show;
$sun92->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/jvm/java-6-sun-1.6.0.26/bin/java -jar];
});}
);
$all_apps->append($sun92);
$swirl86 = 'Gtk2::MenuItem'->new(q[Swirl]);
$swirl86->show;
$swirl86->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/swirl -root];
});}
);
$all_apps->append($swirl86);
$theme104 = 'Gtk2::MenuItem'->new(q[Theme Installer]);
$theme104->show;
$theme104->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-appearance-properties -i];
});}
);
$all_apps->append($theme104);
$window100 = 'Gtk2::MenuItem'->new(q[Window Manager]);
$window100->show;
$window100->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-wm];
});}
);
$all_apps->append($window100);
$xlyap98 = 'Gtk2::MenuItem'->new(q[XLyap]);
$xlyap98->show;
$xlyap98->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/xscreensaver/xlyap -root];
});}
);
$all_apps->append($xlyap98);
$category8->set_submenu($all_apps);
$menu->append($category8);
# # # # # # # # # # # # # # # # # # # # Settings # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category9 = 'Gtk2::MenuItem'->new(q[Settings]);
$about126 = 'Gtk2::MenuItem'->new(q[About Me]);
$about126->show;
$about126->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-about-me];
});}
);
$all_apps->append($about126);
$appearance140 = 'Gtk2::MenuItem'->new(q[Appearance]);
$appearance140->show;
$appearance140->signal_connect('activate', sub {
'threads'->create(sub {
system q[lxappearance];
});}
);
$all_apps->append($appearance140);
$assistive116 = 'Gtk2::MenuItem'->new(q[Assistive Technologies]);
$assistive116->show;
$assistive116->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-at-properties];
});}
);
$all_apps->append($assistive116);
$control139 = 'Gtk2::MenuItem'->new(q[Control Center]);
$control139->show;
$control139->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-control-center];
});}
);
$all_apps->append($control139);
$disk135 = 'Gtk2::MenuItem'->new(q[Disk Manager]);
$disk135->show;
$disk135->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/sbin/disk-manager-root];
});}
);
$all_apps->append($disk135);
$file118 = 'Gtk2::MenuItem'->new(q[File Manager]);
$file118->show;
$file118->signal_connect('activate', sub {
'threads'->create(sub {
system q[thunar-settings];
});}
);
$all_apps->append($file118);
$file141 = 'Gtk2::MenuItem'->new(q[File Management]);
$file141->show;
$file141->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus-file-management-properties];
});}
);
$all_apps->append($file141);
$gparted114 = 'Gtk2::MenuItem'->new(q[GParted]);
$gparted114->show;
$gparted114->signal_connect('activate', sub {
'threads'->create(sub {
system q[gksu /usr/sbin/gparted];
});}
);
$all_apps->append($gparted114);
$keyboard123 = 'Gtk2::MenuItem'->new(q[Keyboard Shortcuts]);
$keyboard123->show;
$keyboard123->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-keybinding-properties];
});}
);
$all_apps->append($keyboard123);
$keyboard129 = 'Gtk2::MenuItem'->new(q[Keyboard]);
$keyboard129->show;
$keyboard129->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-keyboard-properties];
});}
);
$all_apps->append($keyboard129);
$main119 = 'Gtk2::MenuItem'->new(q[Main Menu]);
$main119->show;
$main119->signal_connect('activate', sub {
'threads'->create(sub {
system q[alacarte];
});}
);
$all_apps->append($main119);
$monitors145 = 'Gtk2::MenuItem'->new(q[Monitors]);
$monitors145->show;
$monitors145->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-display-properties];
});}
);
$all_apps->append($monitors145);
$mouse130 = 'Gtk2::MenuItem'->new(q[Mouse]);
$mouse130->show;
$mouse130->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-mouse-properties];
});}
);
$all_apps->append($mouse130);
$multimedia128 = 'Gtk2::MenuItem'->new(q[Multimedia Systems Selector]);
$multimedia128->show;
$multimedia128->signal_connect('activate', sub {
'threads'->create(sub {
system q[gstreamer-properties];
});}
);
$all_apps->append($multimedia128);
$multiple143 = 'Gtk2::MenuItem'->new(q[Multiple screens]);
$multiple143->show;
$multiple143->signal_connect('activate', sub {
'threads'->create(sub {
system q[grandr];
});}
);
$all_apps->append($multiple143);
$openbox136 = 'Gtk2::MenuItem'->new(q[Openbox Configuration Manager]);
$openbox136->show;
$openbox136->signal_connect('activate', sub {
'threads'->create(sub {
system q[obconf];
});}
);
$all_apps->append($openbox136);
$panel132 = 'Gtk2::MenuItem'->new(q[Panel tint2]);
$panel132->show;
$panel132->signal_connect('activate', sub {
'threads'->create(sub {
system q[tint2conf];
});}
);
$all_apps->append($panel132);
$panel138 = 'Gtk2::MenuItem'->new(q[Panel]);
$panel138->show;
$panel138->signal_connect('activate', sub {
'threads'->create(sub {
system q[xfce4-panel -c];
});}
);
$all_apps->append($panel138);
$power115 = 'Gtk2::MenuItem'->new(q[Power Management]);
$power115->show;
$power115->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-power-preferences];
});}
);
$all_apps->append($power115);
$preferred125 = 'Gtk2::MenuItem'->new(q[Preferred Applications]);
$preferred125->show;
$preferred125->signal_connect('activate', sub {
'threads'->create(sub {
system q[libfm-pref-apps];
});}
);
$all_apps->append($preferred125);
$printing133 = 'Gtk2::MenuItem'->new(q[Printing]);
$printing133->show;
$printing133->signal_connect('activate', sub {
'threads'->create(sub {
system q[system-config-printer];
});}
);
$all_apps->append($printing133);
$qt121 = 'Gtk2::MenuItem'->new(q[Qt 4 Settings]);
$qt121->show;
$qt121->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/bin/qtconfig-qt4];
});}
);
$all_apps->append($qt121);
$removable131 = 'Gtk2::MenuItem'->new(q[Removable Drives and Media]);
$removable131->show;
$removable131->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/thunar-volman/thunar-volman-settings];
});}
);
$all_apps->append($removable131);
$screensaver122 = 'Gtk2::MenuItem'->new(q[Screensaver]);
$screensaver122->show;
$screensaver122->signal_connect('activate', sub {
'threads'->create(sub {
system q[xscreensaver-demo];
});}
);
$all_apps->append($screensaver122);
$software120 = 'Gtk2::MenuItem'->new(q[Software Sources]);
$software120->show;
$software120->signal_connect('activate', sub {
'threads'->create(sub {
system q[su-to-root -X -c /usr/bin/software-properties-gtk];
});}
);
$all_apps->append($software120);
$sound144 = 'Gtk2::MenuItem'->new(q[Sound]);
$sound144->show;
$sound144->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-volume-control];
});}
);
$all_apps->append($sound144);
$startup124 = 'Gtk2::MenuItem'->new(q[Startup Applications]);
$startup124->show;
$startup124->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-session-properties];
});}
);
$all_apps->append($startup124);
$sun117 = 'Gtk2::MenuItem'->new(q[Sun Java 6 Policy Tool]);
$sun117->show;
$sun117->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/jvm/java-6-sun-1.6.0.26/bin/policytool];
});}
);
$all_apps->append($sun117);
$sun142 = 'Gtk2::MenuItem'->new(q[Sun Java 6 Plugin Control Panel]);
$sun142->show;
$sun142->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/jvm/java-6-sun-1.6.0.26/bin/ControlPanel];
});}
);
$all_apps->append($sun142);
$synaptic127 = 'Gtk2::MenuItem'->new(q[Synaptic Package Manager]);
$synaptic127->show;
$synaptic127->signal_connect('activate', sub {
'threads'->create(sub {
system q[su-to-root -X -c /usr/sbin/synaptic];
});}
);
$all_apps->append($synaptic127);
$windows137 = 'Gtk2::MenuItem'->new(q[Windows]);
$windows137->show;
$windows137->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-window-properties];
});}
);
$all_apps->append($windows137);
$xfce134 = 'Gtk2::MenuItem'->new(q[Xfce 4 Power Manager]);
$xfce134->show;
$xfce134->signal_connect('activate', sub {
'threads'->create(sub {
system q[xfce4-power-manager-settings];
});}
);
$all_apps->append($xfce134);
$category9->set_submenu($all_apps);
$menu->append($category9);
# # # # # # # # # # # # # # # # # # # # System # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category10 = 'Gtk2::MenuItem'->new(q[System]);
$bleachbit152 = 'Gtk2::MenuItem'->new(q[BleachBit]);
$bleachbit152->show;
$bleachbit152->signal_connect('activate', sub {
'threads'->create(sub {
system q[bleachbit];
});}
);
$all_apps->append($bleachbit152);
$bleachbit153 = 'Gtk2::MenuItem'->new(q[BleachBit (as root)]);
$bleachbit153->show;
$bleachbit153->signal_connect('activate', sub {
'threads'->create(sub {
system q[su-to-root -X -c bleachbit];
});}
);
$all_apps->append($bleachbit153);
$bulk160 = 'Gtk2::MenuItem'->new(q[Bulk Rename]);
$bulk160->show;
$bulk160->signal_connect('activate', sub {
'threads'->create(sub {
system q[/usr/lib/thunar/ThunarBulkRename];
});}
);
$all_apps->append($bulk160);
$cairo151 = 'Gtk2::MenuItem'->new(q[Cairo Composite Manager]);
$cairo151->show;
$cairo151->signal_connect('activate', sub {
'threads'->create(sub {
system q[cairo-compmgr];
});}
);
$all_apps->append($cairo151);
$cd158 = 'Gtk2::MenuItem'->new(q[CD/DVD Creator]);
$cd158->show;
$cd158->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus --no-default-window --no-desktop burn:/// ];
});}
);
$all_apps->append($cd158);
$file149 = 'Gtk2::MenuItem'->new(q[File Browser]);
$file149->show;
$file149->signal_connect('activate', sub {
'threads'->create(sub {
system q[nautilus --no-desktop --browser];
});}
);
$all_apps->append($file149);
$gdebi150 = 'Gtk2::MenuItem'->new(q[GDebi Package Installer]);
$gdebi150->show;
$gdebi150->signal_connect('activate', sub {
'threads'->create(sub {
system q[gdebi-gtk];
});}
);
$all_apps->append($gdebi150);
$htop161 = 'Gtk2::MenuItem'->new(q[Htop]);
$htop161->show;
$htop161->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm -e htop];
});}
);
$all_apps->append($htop161);
$manage155 = 'Gtk2::MenuItem'->new(q[Manage Print Jobs]);
$manage155->show;
$manage155->signal_connect('activate', sub {
'threads'->create(sub {
system q[system-config-printer-applet --no-tray-icon];
});}
);
$all_apps->append($manage155);
$open154 = 'Gtk2::MenuItem'->new(q[Open Folder with Thunar]);
$open154->show;
$open154->signal_connect('activate', sub {
'threads'->create(sub {
system q[Thunar];
});}
);
$all_apps->append($open154);
$power157 = 'Gtk2::MenuItem'->new(q[Power Statistics]);
$power157->show;
$power157->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-power-statistics];
});}
);
$all_apps->append($power157);
$synaptic156 = 'Gtk2::MenuItem'->new(q[Synaptic Package Manager]);
$synaptic156->show;
$synaptic156->signal_connect('activate', sub {
'threads'->create(sub {
system q[synaptic];
});}
);
$all_apps->append($synaptic156);
$system159 = 'Gtk2::MenuItem'->new(q[System Monitor]);
$system159->show;
$system159->signal_connect('activate', sub {
'threads'->create(sub {
system q[gnome-system-monitor];
});}
);
$all_apps->append($system159);
$thunar148 = 'Gtk2::MenuItem'->new(q[Thunar File Manager]);
$thunar148->show;
$thunar148->signal_connect('activate', sub {
'threads'->create(sub {
system q[Thunar];
});}
);
$all_apps->append($thunar148);
$category10->set_submenu($all_apps);
$menu->append($category10);
# # # # # # # # # # # # # # # # # # # # Menutray # # # # # # # # # # # # # # # # # # # #
$all_apps = 'Gtk2::Menu'->new->new;
$category11 = 'Gtk2::MenuItem'->new(q[Menutray]);
$edit164 = 'Gtk2::MenuItem'->new(q[Edit menutray menu]);
$edit164->show;
$edit164->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm -e nano /home/hangar/.config/menutray/menutray.pl];
});}
);
$all_apps->append($edit164);
$edit165 = 'Gtk2::MenuItem'->new(q[Edit menutray schema]);
$edit165->show;
$edit165->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm -e nano /home/hangar/.config/menutray/menutray.schema];
});}
);
$all_apps->append($edit165);
$edit166 = 'Gtk2::MenuItem'->new(q[Edit menutray configuration]);
$edit166->show;
$edit166->signal_connect('activate', sub {
'threads'->create(sub {
system q[xterm -e nano /home/hangar/.config/menutray/menutray.conf];
});}
);
$all_apps->append($edit166);
$category11->set_submenu($all_apps);
$menu->append($category11);
$separator = Gtk2::SeparatorMenuItem->new;
$menu->append($separator);
$item169 = 'Gtk2::MenuItem'->new(q[Regenerate]);
$item169->show;
$item169->signal_connect('activate', sub { `menutray -g`;
'threads'->exit;
});
$menu->append($item169);
$quit = 'Gtk2::MenuItem'->new('Quit');
$quit->show;
$quit->signal_connect('activate', sub { 'threads'->exit; exit; });
$menu->append($quit);
$menu->show_all;
$menu->popup(undef, undef, sub {
return Gtk2::StatusIcon::position_menu($menu, 0, 0, $icon);
}
, [1, 1], 0, 0);
}
'Gtk2'->main;