Part of the Samples Website. 8/16/97.

---

samples.basicStuff.delete1stCharInFile

«Someone on the Mac Scripting list needed to do this

local (f = "Macintosh HD:Desktop Folder:Re- OpenDoc Scripting")

local (type = file.type (f))

local (creator = file.creator (f))

local (creationdate = file.created (f))

local (s = string (toys.readWholeFile (f)))

toys.writeWholeFile (f, string.delete (s, 1, 1), type, creator, creationdate)

This page was last built on Sat, Aug 16, 1997 at 6:34:53 PM. You can download the current set of sample scripts from our FTP site. Dave