scripts/age-1

   1 #!/bin/sh
   2 # $Id: age-1.in,v 1.3 2002/01/06 10:46:24 ajt Exp $
   3 set -e
   4 cd "$(perl -MDebbugs::Config=:config -e 'print $config{spool_dir}')"
   5 test -f ./-3.log && rm ./-3.log
   6 test -f ./-2.log && mv ./-2.log ./-3.log
   7 test -f ./-1.log && mv ./-1.log ./-2.log
   8 #rm -f ../stamp.html