# twm_terms -- Support for terminal windows.
# $Id: ctwm_terms,v 1.13 2000-11-18 19:01:27+01 jv Exp jv $

define(`SSH',`ssh -X')
define(`EXTERM',`f.exec "uxterm -T ifelse(`$2',,,`$2@')$1 -e 'SSH` ifelse(`$2',,,`-l $2 ')$1 &"')

Menu "TermMenu"
{
    "New Window"	f.title
    "*Local"		f.exec "doterm . &"
ifelse(HOSTNAME,phoenix.squirrel.nl,`
    "Eithne"		f.exec "doterm eithne &"
    "Deirdre"		f.exec "doterm deirdre &"
    "Joni"		f.exec "doterm joni &"
')
ifelse(HOSTNAME,eithne.squirrel.nl,`
    "Phoenix"		f.exec "doterm phoenix . -geometry +10+10 &"
    "Deirdre"		f.exec "doterm deirdre &"
    "Joni"		f.exec "doterm joni &"
')
    "Console"		f.exec "sh WM_DIR/XConsole &"
    "-"			f.separator
ifelse(HOSTNAME,phoenix.squirrel.nl,`
    "VMware"	f.exec "vmware -l -- -geometry +10+10 &"
    "Mirage"	f.exec "vmware -l -x -q /home/jv/vmware/mirage/mirage.cfg -- -geometry +10+10 &"
#    "Mirage"	f.exec "do_mirage &"
    "WXPPro"	f.exec "vmware -l /home.jv/vmware/WXPPro/WXPPro.vmx -- -geometry +10+10 &"
    "Amnesia"	f.exec "vmware -l -x -q /home/jv/vmware/w98se/win98.vmx -- -geometry +10+10 &"
    "GNUtella"	f.exec "vncviewer -geometry 1024x768+0+0 -Autoselect=0 -FullColour -passwd HOME/.vnc/passwd :20 &"
    "Deirdre"	f.exec "vncviewer -geometry 1024x768+0+0 deirdre:0 &"
#    "Aoife"	f.exec "vncviewer -geometry 1280x1024+0+0 aoife:0 &"
#    "Joni"	f.exec "vncviewer -geometry 1280x1024+0+0 joni:0 < /dev/null &"
#    "Joni (View)"	f.exec "vncviewer -geometry 1280x1024+0+0 -viewonly -shared joni:0 < /dev/null &"
')
ifelse(HOSTNAME,eithne.squirrel.nl,`
    "GNUtella"	f.exec "vncviewer -geometry 1024x768+0+0 -passwd HOME/.vnc/passwd phoenix:20 &"
    "Deirdre"	f.exec "vncviewer -geometry 1024x768+0+0 deirdre:0 &"
#    "Joni"	f.exec "vncviewer -geometry 1280x1024+0+0 joni:0 < /dev/null &"
#    "Joni (View)"	f.exec "vncviewer -geometry 1280x1024+0+0 -viewonly -shared joni:0 < /dev/null &"
')
    "-"			f.separator
ifelse(HOSTNAME,phoenix.squirrel.nl,`
    "XS4All"		EXTERM(xs4all)
    "GRX"		EXTERM(grx)
    "WarpNet"		EXTERM(warpnet)
')
ifelse(HOSTNAME,eithne.squirrel.nl,`
    "XS4All"		EXTERM(xs4all)
    "GRX"		EXTERM(grx)
    "WarpNet"		EXTERM(warpnet)
')
    "-"			f.separator
    "Consoles"		f.menu "ConsoleMenu"
}

menu "ConsoleMenu" {
    "Console 1"		f.exec "sudo chvt 1 > /dev/null 2>&1 &"
    "*Console 2"	f.exec "sudo chvt 2 > /dev/null 2>&1 &"
    "Console 3"		f.exec "sudo chvt 3 > /dev/null 2>&1 &"
    "Console 4"		f.exec "sudo chvt 4 > /dev/null 2>&1 &"
    "Console 5"		f.exec "sudo chvt 5 > /dev/null 2>&1 &"
    "Console 6"		f.exec "sudo chvt 6 > /dev/null 2>&1 &"
}

# Local Variables:
# eval:(auto-fill-mode -1)
# End: