home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 10 / Fresh_Fish_10_2352.bin / new / dev / obero / oberon / killoberon next >
Text File  |  1994-07-12  |  234b  |  10 lines
  1. status >env:KillOberon1
  2. search env:KillOberon1 Oberon nonum >env:KillOberon2
  3. if not "$KillOberon2" eq ""
  4.  echo "$KillOberon2" first=9 len=2 >env:KillOberon1
  5.  break $KillOberon1 all
  6. endif
  7. delete env:KillOberon1
  8. delete env:KillOberon2
  9.  
  10.