Found on mariner (already did .bashrc and .emacs)

[ian-dotfiles.git] / dot / vtwmrc

diff --git a/dot/vtwmrc b/dot/vtwmrc
index 9db5b74a601e5b21fd33d9eb35973b2fa66f3abb..29c3b3c5fdd13a7d5a32f138accd4892325c4564 100644 (file)
--- a/dot/vtwmrc
+++ b/dot/vtwmrc
@@ -19,6 +19,8 @@ Zoom
 NoRaiseOnMove
 NoRaiseOnResize
 SortIconManager
+NoTitle { "TWM Icon Manager" "VTWM Desktop" "xclock" "xload" }
+DontSqueezeTitle { "emacs" "emacs18" "epoch" "Emacs" }
 SqueezeTitle
 RestartPreviousState
 WarpCursor
@@ -26,15 +28,9 @@ Function "select" { f.iconify f.deiconify }
 WindowFunction f.function "select"
 WindowRing { "emacs" "emacs18" "XTerm" }
 OldFashionedTwmWindowsMenu
+NoStackMode { "emacs" }
 
-NoStackMode {
-       "Iceweasel"
-}
-
-VirtualDesktop "8228x3848-0-0" 48
-
-#VirtualDesktop "6432x3608-208-0" 48
-
+VirtualDesktop "6432x3608-208-0" 48
 #VirtualDesktop "6400x3600-208-0" 48
 # +32,+8
 
@@ -52,22 +48,6 @@ FixManagedVirtualGeometries
 FixTransientVirtualGeometries
 SnapRealScreen
 
-NoTitle {
-       "TWM Icon Manager"
-       "VTWM Desktop"
-       "xclock"
-       "panel"
-       "xload"
-       "xacpi-simple"
-}
-
-DontSqueezeTitle {
-       "emacs"
-       "emacs18"
-       "epoch"
-       "Emacs"
-}
-
 DontShowInDisplay { 
        "VTWM Desktop"
        "xb ian"
@@ -77,8 +57,6 @@ DontShowInDisplay {
        "xclock"
        "xload"
        "XLoad"
-       "panel"
-       "xacpi-simple"
 }
 
 NailedDown {
@@ -91,8 +69,6 @@ NailedDown {
        "xwrits"
        "xload"
        "XLoad"
-       "panel"
-       "xacpi-simple"
 }
 
 Cursors
@@ -186,34 +162,16 @@ Button1 = control|shift|m : window|frame|title            : f.destroy
 Button2 = control|shift|m : window|frame|title         : f.forcemove
 Button3 = control|shift|m : window|frame|title         : f.menu "windowmenu"
 
-"Up"   = m : all                               : f.function "pan-up"
-"Down" = m : all                               : f.function "pan-down"
-"Left" = m : all                               : f.function "pan-left"
-"Right"        = m : all                               : f.function "pan-right"
-
-Function "pan-up" {
-       !"raise-mini-desktop"
-       f.panup "100"
-}
-Function "pan-down" {
-       !"raise-mini-desktop"
-       f.pandown "100"
-}
-Function "pan-left" {
-       !"raise-mini-desktop"
-       f.panleft "100"
-}
-Function "pan-right" {
-       !"raise-mini-desktop"
-       f.panright "100"
-}
+"Up"   = m : all                               : f.panup    "100"
+"Down" = m : all                               : f.pandown  "100"
+"Left" = m : all                               : f.panleft  "100"
+"Right"        = m : all                               : f.panright "100"
 
 Function "drag-with-up" {
        f.nail
        f.panup "100"
        f.raise
        f.nail
-       !"raise-mini-desktop"
 }
 
 Function "drag-with-down" {
@@ -221,21 +179,20 @@ Function "drag-with-down" {
        f.pandown "100"
        f.raise
        f.nail
-       !"raise-mini-desktop"
 }
+
 Function "drag-with-left" {
        f.nail
        f.panleft "100"
        f.raise
        f.nail
-       !"raise-mini-desktop"
 }
+
 Function "drag-with-right" {
        f.nail
        f.panright "100"
        f.raise
        f.nail
-       !"raise-mini-desktop"
 }
 
 "Up"   = m|shift : window|frame|title  : f.function "drag-with-up"
@@ -244,7 +201,7 @@ Function "drag-with-right" {
 "Right"        = m|shift : window|frame|title  : f.function "drag-with-right"
 
 # Accelerators out of icon manager
-# "F1"         =       : icon|window|frame|title       : f.iconify
+#"F1"          =       : icon|window|frame|title       : f.iconify
 "F2"           =       : icon|window|frame|title       : f.raise
 "F3"           =       : icon|window|frame|title       : f.lower
 "F1"           =       : iconmgr                       : f.hideiconmgr
@@ -260,7 +217,7 @@ Function "drag-with-right" {
 
 # Accelerators everywhere for new clients
 "F4"           =       : all                   : !"xtrlock &"
-"F6"           =       : all           : !"LC_CTYPE=en_GB.utf-8 xterm &"
+"F6"           =       : all                   : !"xterm &"
 
 menu "windowmenu"
 {
@@ -293,7 +250,7 @@ menu "special"
 {
        "Management"            f.title
        "Refresh"               f.refresh
-       "Restart"               f.function "restart"
+       "Restart"               f.restart
        ""                      f.nop
        "Kill twm"              f.quit
        ""                      f.nop
@@ -301,21 +258,16 @@ menu "special"
        "Hide icon list"        f.hideiconmgr
 }
 
-Function "restart" {
-       !"rm .configs/mini-desktop-window-id"
-       f.restart
-}
-
 menu "programs"
 {
        "Programs"      f.title
        "Emacs restart" !".configs/startemacs"
        "Emacs left"    !"emacs -geometry 79x40+0+35 &"
        ""              f.nop
- "IRC Diziet" !"xterm -geometry 80x24+24-0 -T ' IRC' -e sh -c 'ssh -vt ijackson@tunnel.chiark.greenend.org.uk screen -x irc; read x' &"
-# "IRC iwj" !"xterm -geometry 80x70+340-0 -T 'IRC iwj' -e irc iwj cam.irc.devel.ncipher.com &"
+ "IRC Diziet" !"xterm -geometry 80x70+240-0 -T 'IRC Diziet' -e irc Diziet localhost &"
+ "IRC iwj" !"xterm -geometry 80x70+340-0 -T 'IRC iwj' -e irc iwj cam.irc.devel.ncipher.com &"
        ""              f.nop
-       "Trn"           !"xterm -geometry 80x45+240+95 -e trn &"
+       "Trn"           !"MAILCAPS=/u/iwj/.trnmailcap xterm -geometry 80x45+240+95 -e trn4 &"
        "Archie"        !"xarchie &"
        "Calc"          !"xcalc &"
 #      "Xab large"     !"xab &"
@@ -358,9 +310,9 @@ Menu "hosts"
  "Shep"                !"xterm-CT 'shep ssh' -e ssh shep.cl.cam.ac.uk -l iwj10 &"
  "Ouse"                !"xterm-CT 'ouse ssh' -e ssh ouse.cl.cam.ac.uk -l iwj10 &"
        ""              f.nop
- "Chiark"      !"xterm-CT 'chiark ssh' -e ssh chiark.greenend.org.uk -l ijackson &"
- "Chiark ian"  !"xterm-CT 'chiark ssh ian' -e ssh chiark.greenend.org.uk -l ian &"
- "Chiark II"   !"xterm-CT 'chiark ssh II' -e ssh chiark.greenend.org.uk -t -l ijackson personal/linux/bin/II &"
+ "Chiark"      !"xterm-CT 'chiark ssh' -e ssh tunnel.chiark.greenend.org.uk -l ijackson &"
+ "Chiark ian"  !"xterm-CT 'chiark ssh ian' -e ssh tunnel.chiark.greenend.org.uk -l ian &"
+ "Chiark II"   !"xterm-CT 'chiark ssh II' -e ssh tunnel.chiark.greenend.org.uk -t -l ijackson personal/linux/bin/II &"
  "Iguana"      !"xterm-CT 'iguana ssh' -e ssh iguana.ucam.org -l ijackson &"
  "Utter"       !"xterm-CT 'utter ssh' -e ssh utter.chaos.org.uk -l ijackson &"
        ""              f.nop