equal
deleted
inserted
replaced
65 "/ want to know about image restart |
65 "/ want to know about image restart |
66 "/ |
66 "/ |
67 ObjectMemory addDependent:self |
67 ObjectMemory addDependent:self |
68 ! |
68 ! |
69 |
69 |
70 update:something |
70 update:something with:aParameter from:changedObject |
71 "/ |
71 "/ |
72 "/ currentDirectory may be different when restarted |
72 "/ currentDirectory may be different when restarted |
73 "/ |
73 "/ |
74 something == #restarted ifTrue:[ |
74 something == #restarted ifTrue:[ |
75 PathOfCurrentDirectory := nil |
75 PathOfCurrentDirectory := nil |
76 ] |
76 ] |
|
77 |
|
78 "Created: 15.6.1996 / 15:20:21 / cg" |
77 ! ! |
79 ! ! |
78 |
80 |
79 !FileDirectory class methodsFor:'instance creation'! |
81 !FileDirectory class methodsFor:'instance creation'! |
80 |
82 |
81 currentDirectory |
83 currentDirectory |
588 ! ! |
590 ! ! |
589 |
591 |
590 !FileDirectory class methodsFor:'documentation'! |
592 !FileDirectory class methodsFor:'documentation'! |
591 |
593 |
592 version |
594 version |
593 ^ '$Header: /cvs/stx/stx/libbasic/FileDirectory.st,v 1.27 1996-04-25 16:15:05 cg Exp $' |
595 ^ '$Header: /cvs/stx/stx/libbasic/FileDirectory.st,v 1.28 1996-06-15 13:21:21 cg Exp $' |
594 ! ! |
596 ! ! |
595 FileDirectory initialize! |
597 FileDirectory initialize! |