|
|
1.1 ! root 1: # @(#)windowrc 3.8 2/21/88 ! 2: # ! 3: # Copyright (c) 1983 Regents of the University of California, ! 4: # All rights reserved. Redistribution permitted subject to ! 5: # the terms of the Berkeley Software License Agreement. ! 6: # ! 7: # Configuration file example for window manager ! 8: # To be installed in ~/.windowrc ! 9: # ! 10: # Create two unequal sized windows of full screen width, ! 11: # and set up some useful aliases. ! 12: # ! 13: ! 14: # ! 15: # Optional settings ! 16: # ! 17: # terse on # set terse mode ! 18: # escape "^A" # set escape character ! 19: # nline 100 # set default buffer size ! 20: # initially, this is 48 ! 21: ! 22: # ! 23: # Make two windows ! 24: # The bottom one is MIN(24, total lines * 3 / 4) lines ! 25: # The top one is the rest of the screen. ! 26: # ! 27: three_fourth = $nrow - ((_ = $nrow * 3 / 4) > 24 ? 24 : $_) ! 28: unset _ ! 29: window row = 0, nrow = $three_fourth - 1, label = "Top" ! 30: window row = $three_fourth, label = "Local" ! 31: ! 32: # ! 33: # Useful aliases ! 34: # ! 35: # ! 36: # Standard window ! 37: # ! 38: alias std "window r = $three_fourth, l = $?1 ? $1 : ''" ! 39: # ! 40: # Sysline, add your own options ! 41: # ! 42: alias sysline "_ = select();" \ ! 43: "foreground window(r = 0, nr = 1, nc = $ncol + 1, nl = 0," \ ! 44: "l = sysline, pty = no, frame = no, sh = sysline \\-w), 1;" \ ! 45: "select $_; unset _" ! 46: # ! 47: # Rlogin ! 48: # ! 49: alias rlogin "window r = $three_fourth, l = $1, pty = no, mapnl = no," \ ! 50: "sh = sh \\-c 'echo $TERMCAP | rsh ' + $1 + ' \\'cat > .TERMCAP\\' ;" \ ! 51: "exec rlogin ' + $1" ! 52: alias rl rlogin \$1 ! 53: # ! 54: # Two equal windows ! 55: # ! 56: alias two "window r = 1, nr = $nrow / 2 - 1, l = top;" \ ! 57: "window r = $nrow / 2 + 1, l = bottom"
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.