home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / unpost / !Unpost / DoUnPost < prev    next >
Text File  |  1995-10-06  |  728b  |  27 lines
  1. | This describes what UnPost does normally
  2. |
  3. | Pass files to UnPost as command line arguments
  4.  
  5. If "%*0"="" Then Error Syntax: DoUnPost [|<file>]+
  6. If "<Wimp$ScrapDir>"="" Then Error Wimp$ScrapDir not set
  7.  
  8. CDir <UnPostOut$Dir>
  9.  
  10. Filer_OpenDir <UnPostOut$Dir>
  11.  
  12. If "%0" = "-log" Then Set Args %*1 Else Set Args %*0
  13. Set Parms -c UnPost:cfg.KA9Q -o UnPostOut:
  14. If "%0" = "-log" Then Set Parms 2>>UnPostOut:UnPostLog <Parms>
  15. Set Alias$Temp /UnPost:unpost <Parms> -i UnPostOut:Incomplete <Args>
  16. Temp
  17. Set Alias$Temp /UnPost:unpost <Parms> -i UnPostOut:Incomplet2 UnPostOut:Incomplete
  18. Temp
  19. |UnSet Alias$Temp
  20. UnSet Args
  21. UnSet Parms
  22.  
  23. Delete UnPostOut:Incomplete
  24. Rename UnPostOut:Incomplet2 UnPostOut:Incomplete
  25.  
  26. Filer_OpenDir <UnPostOut$Dir>
  27.