merge vtwmrc, turn it into a template

[ian-dotfiles.git] / templates / vtwmrc.in

diff --git a/dot/vtwmrc b/templates/vtwmrc.in
old mode 100644 (file)
new mode 100755 (executable)
similarity index 94%
rename from dot/vtwmrc
rename to templates/vtwmrc.in
index 844ca56..1ca85fc
--- a/dot/vtwmrc
+++ b/templates/vtwmrc.in
@@ -1,3 +1,8 @@
+#!/bin/bash
+set -e
+. infra/template
+
+cat <<END
 #
 # Ian's twm configuration file.
 #
@@ -26,18 +31,11 @@ Function "select" { f.iconify f.deiconify }
 WindowFunction f.function "select"
 WindowRing { "emacs" "emacs18" "XTerm" }
 OldFashionedTwmWindowsMenu
+NoStackMode { "emacs" "Iceweasel" }
 
-NoStackMode {
-       "Iceweasel"
-}
-
-#VirtualDesktop "6x5-0-0" 48
-VirtualDesktop "19200x9100-0-0" 48
-
-#VirtualDesktop "8228x3848-0-0" 48
+VirtualDesktop $vtwmvdesktop 48
 
 #VirtualDesktop "6432x3608-208-0" 48
-
 #VirtualDesktop "6400x3600-208-0" 48
 # +32,+8
 
@@ -218,7 +216,6 @@ Function "drag-with-up" {
        f.nail
        !"raise-mini-desktop"
 }
-
 Function "drag-with-down" {
        f.nail
        f.pandown "100"
@@ -318,11 +315,11 @@ menu "programs"
  "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 &"
        ""              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 &"
-#      "Xab small"     !"perl -e '$xab=\"xab\"; exec $xab \"other-xab\"' &"
+#      "Xab small"     !"perl -e '\$xab=\"xab\"; exec \$xab \"other-xab\"' &"
        ""              f.nop
        "Management"    f.menu "special"
        "Hosts"         f.menu "hosts"
@@ -361,9 +358,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
@@ -382,8 +379,6 @@ Menu "hosts"
  "Va"          !"xterm-CT 'va' -e ssh va.debian.org -l iwj &"
  "Nyx"         !"xterm-CT 'nyx - rlogin' -e rlogin nyx.cs.du.edu -l ijackson &"
  "Sunsite"     !"xterm-CT 'sunsite' -e rlogin sunsite.unc.edu -l iwj &"
- "White"               !"xterm-CT 'white' -geometry 80x25 -e sh -c \
-               'rlogin white.dogwood.com; line >/dev/null' &"
 }
 
 Menu "demos"
@@ -414,3 +409,4 @@ Menu "games"
        "Solitaire"                     !"xsol &"
        "Spider"                        !"spider &"
 }
+END