#!/bin/csh -f
#
switch ("$1")
  case a4:
  case A4:
    rm -f /usr/andrew/lib/tmac/tmac.atk
    ln -s A4tmac.atk /usr/andrew/lib/tmac/tmac.atk
    echo "Paper size set to A4.  Restart AUIS apps for this to take effect."
    breaksw
  case us*:
  case US*:
    rm -f /usr/andrew/lib/tmac/tmac.atk
    ln -s UStmac.atk /usr/andrew/lib/tmac/tmac.atk
    echo "Paper size set for USA.  Restart AUIS apps for this to take effect."
    breaksw
  default :
    set me = "$0"
    echo "Usage: $me:t [ US A4]"
    echo ""
    echo "Set the size of paper AUIS applications will use to print"
    exit 1
endsw