equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1997 by eXept Software AG |
4 COPYRIGHT (c) 1997 by eXept Software AG |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
380 ! ! |
382 ! ! |
381 |
383 |
382 !FileSelectionBrowser methodsFor:'accessing'! |
384 !FileSelectionBrowser methodsFor:'accessing'! |
383 |
385 |
384 directory: aDirectory |
386 directory: aDirectory |
385 |
387 directory := (aDirectory ? Filename currentDirectory) asFilename pathName |
386 directory := (aDirectory ? Filename currentDirectory) asFilename asAbsoluteFilename pathName |
388 |
387 |
389 "Modified: / 17-08-1998 / 10:15:53 / cg" |
388 "Modified: / 17.8.1998 / 10:15:53 / cg" |
390 "Modified: / 11-04-2019 / 18:04:31 / Stefan Vogel" |
389 ! |
391 ! |
390 |
392 |
391 directoryView |
393 directoryView |
392 "return the directory view on the right side (a subcanvas)" |
394 "return the directory view on the right side (a subcanvas)" |
393 |
395 |