home *** CD-ROM | disk | FTP | other *** search
- .KEY OBJECT,LOG,ALL/S
- .BRA {
- .KET }
-
- .DEF LOG "MCPP:lib/logfile"
-
- IF "{ALL}" EQ ""
- IF "{OBJECT}" EQ ""
- ECHO "Specify Objectname or use option ALL"
- ELSE
- copy {LOG} TO {LOG}.bik
- delObject {LOG} {OBJECT}
- ENDIF
- ELSE
- copy {LOG} TO {LOG}.bik
- list #?.o LFORMAT "delObject {LOG} %s" TO T:log
- execute T:log
- delete >NIL: T:log
- ENDIF
-