The Trunk: Files-bf.88.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Files-bf.88.mcz

commits-2
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!


Reply | Threaded
Open this post in threaded view
|

Re: The Trunk: Files-bf.88.mcz

Chris Muller-3
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!
>
>
>