BSD 4_3_Reno release

[unix-history] / usr / src / usr.bin / window / windowrc

diff --git a/usr/src/usr.bin/window/windowrc b/usr/src/usr.bin/window/windowrc
index 84aa213..adfa893 100644 (file)
--- a/usr/src/usr.bin/window/windowrc
+++ b/usr/src/usr.bin/window/windowrc
@@ -1,15 +1,57 @@
-#      @(#)windowrc    3.2 83/08/22
+# @(#)windowrc 3.8 2/21/88
+#
+# Copyright (c) 1983 Regents of the University of California,
+# All rights reserved.  Redistribution permitted subject to
+# the terms of the Berkeley Software License Agreement.
+#
+# Configuration file example for window manager
+# To be installed in ~/.windowrc
+#
+# Create two unequal sized windows of full screen width,
+# and set up some useful aliases.
+#

 
 

-# configuration file example for window manager
-# to be installed in ~/.windowrc

 #
 #

-# creates two unequal sized windows of full screen width.
+# Optional settings
+#
+# terse on                     # set terse mode
+# escape "^A"                  # set escape character
+# nline 100                    # set default buffer size
+                               # initially, this is 48

 
 

-# terse                                # set terse mode (if you want)
-# escape ^A                    # set escape character (if you want)
+#
+# Make two windows
+# The bottom one is MIN(24, total lines * 3 / 4) lines
+# The top one is the rest of the screen.
+#
+three_fourth = $nrow - ((_ = $nrow * 3 / 4) > 24 ? 24 : $_)
+unset _
+window row = 0, nrow = $three_fourth - 1, label = "Top"
+window row = $three_fourth, label = "Local"

 
 

-window * * 15 *                        # top window 15 lines
-label 1 "Top Window"           # label it
-window 17 * * *                        # bottom window rest of the screen
-label 2 "Bottom Window"                # label
-%1                             # current window is 1
+#
+# Useful aliases
+#
+#
+# Standard window
+#
+alias std "window r = $three_fourth, l = $?1 ? $1 : ''"
+#
+# Sysline, add your own options
+#
+alias sysline "_ = select();" \
+       "foreground window(r = 0, nr = 1, nc = $ncol + 1, nl = 0," \
+               "l = sysline, pty = no, frame = no, sh = sysline \\-w), 1;" \
+       "select $_; unset _"
+#
+# Rlogin
+#
+alias rlogin "window r = $three_fourth, l = $1, pty = no, mapnl = no," \
+       "sh = sh \\-c 'echo $TERMCAP | rsh ' + $1 + ' \\'cat > .TERMCAP\\' ;" \
+       "exec rlogin ' + $1"
+alias rl rlogin \$1
+#
+# Two equal windows
+#
+alias two "window r = 1, nr = $nrow / 2 - 1, l = top;" \
+       "window r = $nrow / 2 + 1, l = bottom"