'From Squeak3.8.1 of ''28 Aug 2006'' [latest update: #6747] on 28 September 2007 at 9:29:48 am'!

!FileDirectory methodsFor: 'file stream creation' stamp: 'sjg 9/27/2007 15:16'!
oldFileOrNoneNamed: fileName
	"If the file exists, answer a read-only FileStream on it. If it doesn't, answer nil."

	^ FileStream concreteStream oldFileOrNoneNamed: (self fullNameFor: fileName)
! !