## gPad $home/.gpad/tools.plugin Tools menu plugin-file, use pure Perl only
## INSTALL: wget http://uhvo.org/sec/gpad-tools.plugin.txt -O ~/.gpad/tools.plugin
##
## $menu101, $menu102, $menu103, $menu104 and $menu105 can be used in this file as new menu lines
## look examples below


## These lines will add a new Tools -> XCalc line to the main menu
  if (-x "/usr/bin/xcalc"){  
   $xmenu  -> append($menu101 = Gtk2::MenuItem -> new(" XCalc "));  # $menu101 used here
   $menu101 -> signal_connect("activate" => sub{run("xcalc")});     # $menu101 used here
  }


## These lines will add a new Tools -> XClock line to the main menu
  if (-x "/usr/bin/xclock"){  
   $xmenu  -> append($menu102 = Gtk2::MenuItem -> new(" XClock ")); # $menu102 used here
   $menu102 -> signal_connect("activate" => sub{run("xclock")});    # $menu102 used here
  }


## end of file: $home/.gpad/tools.plugin
## auto-ftp -f ~/.gpad/tools.plugin -p dash-sec --newname tools.plugin.txt --force-auto