equal
deleted
inserted
replaced
1 "{ Encoding: utf8 }" |
|
2 |
|
3 " |
1 " |
4 COPYRIGHT (c) 2002 by eXept Software AG |
2 COPYRIGHT (c) 2002 by eXept Software AG |
5 All Rights Reserved |
3 All Rights Reserved |
6 |
4 |
7 This software is furnished under a license and may be used |
5 This software is furnished under a license and may be used |
395 file := self shownList at:entries first. |
393 file := self shownList at:entries first. |
396 file isText ifTrue:[^ self]. |
394 file isText ifTrue:[^ self]. |
397 |
395 |
398 fn := file asFilename. |
396 fn := file asFilename. |
399 fn exists ifFalse:[ |
397 fn exists ifFalse:[ |
400 self notify:('%1 does not (no longer ?) exist or is not accessable.' bindWith:file allBold). |
398 self notify:('%1 does not (no longer ?) exist or is not accessible.' bindWith:file allBold). |
401 ^ self |
399 ^ self |
402 ]. |
400 ]. |
403 fn isDirectory ifTrue:[ |
401 fn isDirectory ifTrue:[ |
404 self notify:nil. |
402 self notify:nil. |
405 ^ self. |
403 ^ self. |
486 ! ! |
484 ! ! |
487 |
485 |
488 !AbstractFileFinderApplicationComponent class methodsFor:'documentation'! |
486 !AbstractFileFinderApplicationComponent class methodsFor:'documentation'! |
489 |
487 |
490 version |
488 version |
491 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.17 2015-04-22 17:25:52 stefan Exp $' |
489 ^ '$Header$' |
492 ! |
490 ! |
493 |
491 |
494 version_CVS |
492 version_CVS |
495 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.17 2015-04-22 17:25:52 stefan Exp $' |
493 ^ '$Header$' |
496 ! ! |
494 ! ! |
497 |
495 |