Return to windowrc CVS log

Up to [CSRG BSD Unix] / 43BSD / ucb / window

Annotation of 43BSD/ucb/window/windowrc, revision 1.1.1.1

1.1       root        1: # @(#)windowrc 3.7 6/4/85
                      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.