--- a/DirectoryDifferenceViewApplication.st Tue Feb 10 19:46:10 2015 +0100
+++ b/DirectoryDifferenceViewApplication.st Tue Feb 10 20:05:44 2015 +0100
@@ -11,6 +11,8 @@
"
"{ Package: 'stx:libtool' }"
+"{ NameSpace: Smalltalk }"
+
AbstractFileFinderApplicationComponent subclass:#DirectoryDifferenceViewApplication
instanceVariableNames:'directory1Holder directory2Holder directory1 directory2
filesOnlyInDirectory1 filesOnlyInDirectory2
@@ -384,10 +386,10 @@
fn1 := self directory1Holder value asFilename construct:file.
fn2 := self directory2Holder value asFilename construct:file.
- fn1 exists ifTrue:[
+ (fn1 exists and:[fn1 isRegularFile]) ifTrue:[
text1 := fn1 contentsAsString.
].
- fn2 exists ifTrue:[
+ (fn2 exists and:[fn2 isRegularFile]) ifTrue:[
text2 := fn2 contentsAsString.
].
differ := builder componentAt:'DiffTextView'.
@@ -540,10 +542,10 @@
!DirectoryDifferenceViewApplication class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DirectoryDifferenceViewApplication.st,v 1.7 2014-06-14 09:30:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DirectoryDifferenceViewApplication.st,v 1.8 2015-02-10 19:05:44 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/DirectoryDifferenceViewApplication.st,v 1.7 2014-06-14 09:30:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DirectoryDifferenceViewApplication.st,v 1.8 2015-02-10 19:05:44 cg Exp $'
! !