[Pharo-project] Finding Family-tree of images

Igor Stasenko siguctua at gmail.com
Thu Nov 11 03:37:21 CET 2010

On 11 November 2010 02:01, HwaJong Oh <daliot.oh at gmail.com> wrote:
> I have a hibbit of saving new version of images when i feed unsecure about
> something. So i end up a lot of disk space taken by them. I felt it is time
> for me to clean up the redundance in my disk. I wanted to have a sense of
> family tree of the images.
> l := (FileStream fileNamed:'Squeak4.0-basic-pocketcube-morphic.changes')
> contents lines.
> s := l select: [:each| each beginsWith: '----SNAPSHOT----'].
> i := OrderedCollection new.
> (s collect: [:ea| ea substrings at: 7 ]) do: [:e|
>        (i includes: e) ifFalse: [i addLast: e.].
>        ].
> i
> Now i have images names in time order. But still i need to run this code on
> every images not listed in evaluated result.
> How do you handle this problem?
you could use a file directory to find all .changes files
and then simply scan them like above.

> Best regards
> HwaJong Oh
> --
> View this message in context: http://forum.world.st/Finding-Family-tree-of-images-tp3037106p3037106.html
> Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

Best regards,
Igor Stasenko AKA sig.

More information about the Pharo-project mailing list