home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fish 'n' More 2
/
fishmore-publicdomainlibraryvol.ii1991xetec.iso
/
fish
/
text
/
editors
/
dme_441
/
rexmacs
/
save.dme
< prev
next >
Wrap
Text File
|
1991-01-24
|
487b
|
16 lines
/* Saves the file with the filename specified by the 1st argument. */
/* If no name is specified, the file is saved with it's original */
/* filename. Arguments following the 1st one are ignored. */
/* */
/* Kim DeVaughn 12/21/87 */
options failat 5
rc = 0
parse arg filename junk
if filename = ""
then saveold
else saveas filename
exit rc