Bert Freudenberg uploaded a new version of Files to project The Trunk:
http://source.squeak.org/trunk/Files-bf.88.mcz ==================== Summary ==================== Name: Files-bf.88 Author: bf Time: 9 September 2010, 12:43:41.62 pm UUID: 128dbf17-b62e-4aa6-9c50-e8259b7cf5b0 Ancestors: Files-ar.87 Make FileDirectory>>assureExistence work with security sandbox enabled. It does not rely on listing the parent directory's contents anymore, which does not work when sandboxed. FileDirectory>>assureExistenceOfPath: could be removed, it is unused in trunk. Not sure if 3rd-party code uses it, so I left it in for now. Maybe deprecate? =============== Diff against Files-ar.87 =============== Item was changed: ----- Method: FileDirectory>>assureExistence (in category 'file directory') ----- assureExistence "Make sure the current directory exists. If necessary, create all parts in between" + self exists ifFalse: [ + self containingDirectory + assureExistence; + createDirectory: self localName]! - self containingDirectory assureExistenceOfPath: self localName! Item was changed: ----- Method: FileDirectory>>assureExistenceOfPath: (in category 'file directory') ----- assureExistenceOfPath: lPath "Make sure the local directory exists. If necessary, create all parts in between" | localPath | localPath := lPath. localPath isEmpty ifTrue: [ ^self ]. "Assumed to exist" + self assureExistence. (self directoryExists: localPath) ifTrue: [^ self]. "exists" - "otherwise check parent first and then create local dir" - self containingDirectory assureExistenceOfPath: self localName. self createDirectory: localPath! |
It seems unlikely that anyone would be using this method, but since it
is not in the 'private' category, it might be better to deprecate for a while before deleting. On Thu, Sep 9, 2010 at 5:43 AM, <[hidden email]> wrote: > Bert Freudenberg uploaded a new version of Files to project The Trunk: > http://source.squeak.org/trunk/Files-bf.88.mcz > > ==================== Summary ==================== > > Name: Files-bf.88 > Author: bf > Time: 9 September 2010, 12:43:41.62 pm > UUID: 128dbf17-b62e-4aa6-9c50-e8259b7cf5b0 > Ancestors: Files-ar.87 > > Make FileDirectory>>assureExistence work with security sandbox enabled. It does not rely on listing the parent directory's contents anymore, which does not work when sandboxed. > > FileDirectory>>assureExistenceOfPath: could be removed, it is unused in trunk. Not sure if 3rd-party code uses it, so I left it in for now. Maybe deprecate? > > =============== Diff against Files-ar.87 =============== > > Item was changed: > ----- Method: FileDirectory>>assureExistence (in category 'file directory') ----- > assureExistence > "Make sure the current directory exists. If necessary, create all parts in between" > > + self exists ifFalse: [ > + self containingDirectory > + assureExistence; > + createDirectory: self localName]! > - self containingDirectory assureExistenceOfPath: self localName! > > Item was changed: > ----- Method: FileDirectory>>assureExistenceOfPath: (in category 'file directory') ----- > assureExistenceOfPath: lPath > "Make sure the local directory exists. If necessary, create all parts in between" > | localPath | > localPath := lPath. > localPath isEmpty ifTrue: [ ^self ]. "Assumed to exist" > + self assureExistence. > (self directoryExists: localPath) ifTrue: [^ self]. "exists" > - "otherwise check parent first and then create local dir" > - self containingDirectory assureExistenceOfPath: self localName. > self createDirectory: localPath! > > > |
Free forum by Nabble | Edit this page |