#
# $XConsortium: system.twmrc,v 1.8 91/04/23 21:10:58 gildea Exp $
# 
# Default twm configuration file; needs to be kept small to conserve string
# space in systems whose compilers don't handle medium-sized strings.
#
# Sites should tailor this file, providing any extra title buttons, menus, etc.
# that may be appropriate for their environment.  For example, if most of the
# users were accustomed to uwm, the defaults could be set up not to decorate
# any windows and to use meta-keys.
#

NoGrabServer
RestartPreviousState
#DecorateTransients
TitleFont "-adobe-helvetica-bold-r-normal--*-120-*-*-*-*-*-*"
ResizeFont "-adobe-helvetica-bold-r-normal--*-120-*-*-*-*-*-*"
MenuFont "-adobe-helvetica-bold-r-normal--*-120-*-*-*-*-*-*"
IconFont "-adobe-helvetica-bold-r-normal--*-100-*-*-*-*-*-*"
IconManagerFont "-adobe-helvetica-bold-r-normal--*-100-*-*-*"
#ClientBorderWidth
DontMoveOff
IconifyByUnmapping
ShowIconManager
StartIconified {"ccmail"}

Color
{
    BorderColor "red"
    DefaultBackground "lightgrey"
    DefaultForeground "black"
    TitleBackground "maroon"
    TitleForeground "gray85"
    MenuBackground "maroon"
    MenuForeground "gray85"
    MenuTitleBackground "gray70"
    MenuTitleForeground "maroon"
    IconBackground "maroon"
    IconForeground "gray85"
    IconBorderColor "gray85"
    IconManagerBackground "maroon"
    IconManagerForeground "gray85"
}

#
# Define some useful functions for motion-based actions.
#
MoveDelta 3
Function "move-or-lower" { f.move f.deltastop f.lower }
Function "move-or-raise" { f.move f.deltastop f.raise }
Function "move-or-iconify" { f.move f.deltastop f.iconify }

#
# Set some useful bindings.  Sort of uwm-ish, sort of simple-button-ish
#
Button1 = : root : f.menu "mainmenu"
Button2 = : root : f.menu "defops"

Button1 = c : window|icon : f.resize
Button2 = c : window|icon : f.move
Button3 = c : window|icon : f.iconify

Button1 = s : window|icon : f.raise
Button3 = s : window|icon : f.lower

Button1 = : title : f.function "move-or-raise"
Button2 = : title : f.raiselower
Button3 = : title : f.function "move-or-lower"

Button2 = c : title : f.delete
Button3 = c : title : f.destroy

Button1 = : icon : f.function "move-or-iconify"
Button2 = : icon : f.iconify

Button1 = : iconmgr : f.iconify
Button2 = : iconmgr : f.iconify

#
# And a menus with the usual things
#
menu "mainmenu"
{
"Applications"        f.title
  "Large Xterm"         f.exec "xterm -e tcsh &"
  "Small Xterm"         f.exec "xterm -fn courr12 -e tcsh &"
  ""                    f.nop
  "Mozilla"             f.exec "mozilla &"
  ""                    f.nop
  "Xcalc"               f.exec "xcalc -rpn &"
  "Xlock"               f.exec "${HOME}/bin/xlock -mode random &"
  "Xman"                f.exec "xman &"
  ""                    f.nop
  "Isql"                f.menu "isql_menu"
  ""                    f.nop
  "CSS"         f.menu "css_menu"
  }
  
  menu "isql_menu"
  {
  "DLS_DEV2"    f.exec "xterm -T 'isql DLS_DEV2' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SDLS_DEV2 -Ucudwoma 
  -P -w 132 &"
  "DLS_TEST"    f.exec "xterm -T 'isql DLS_TEST' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SDLS_TEST -Ucudwoma 
  -P -w 132 &"
  "DLS_TEST2"   f.exec "xterm -T 'isql DLS_TEST2' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SDLS_TEST2 -Ucudwoma 
  -P -w 132 &"
  "DLS_PROD"    f.exec "xterm -T 'isql DLS_PROD' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SDLS_PROD -Ucudwoma 
  -PTbUffZNQ -w 132 &"
  "PCS_DEV2"    f.exec "xterm -T 'isql PCS_DEV2' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SPCS_DEV2 -Ucudwoma 
  -P -w 132 &"
  "PCS_TEST"    f.exec "xterm -T 'isql PCS_TEST' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SPCS_TEST -Ucudwoma 
  -P -w 132 &"
  "PCS_TEST2"   f.exec "xterm -T 'isql PCS_TEST2' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SPCS_TEST2 -Ucudwoma 
  -P -w 132 &"
  "PCS_PROD"    f.exec "xterm -T 'isql PCS_PROD' -fn courr12 -fg cyan -bg 
  black -geometry 132x50 -sb -e /vol/sybase/bin/isql -SPCS_PROD -Ucudwoma 
  -PTbUffZNQ -w 132 &"
  }
  menu "css_menu"
  {
  "CSS Tool (DEV2) ..." f.exec "/vol/develop/bin/run_css_dev dev2 &"
  "CSS Tool (TEST) ..."   f.exec "/vol/develop/bin/run_css_dev test &"
  "CSS Tool (TEST2) ..."  f.exec "/vol/develop/bin/run_css_dev test2 &"
  "CSS Tool (PROD) ..."   f.exec "/vol/develop/bin/run_css &"
  }
  
  menu "defops"
  {
  "Twm" f.title
  "Iconify"     f.iconify
  "Resize"      f.resize
  "Move"                f.move
  "Raise"               f.raise
  "Lower"               f.lower
  ""            f.nop
  "Focus"               f.focus
  "Unfocus"     f.unfocus
  "Show Iconmgr"        f.showiconmgr
  "Hide Iconmgr"        f.hideiconmgr
  ""            f.nop
  "Kill"                f.destroy
  "Delete"      f.delete
  ""            f.nop
  "Refresh"     f.refresh
  ""            f.nop
  "Restart"     f.restart
  "Exit"                f.quit
  }