--- a/AbstractDirectoryBrowser.st Wed Dec 17 15:59:39 2014 +0100
+++ b/AbstractDirectoryBrowser.st Wed Dec 17 16:32:42 2014 +0100
@@ -99,7 +99,7 @@
dropObjects := aContext dropObjects.
dropObjects do:[:anObject|
- |checkObject checkObjectString|
+ |checkObject|
anObject isFileObject ifFalse:[^ self].
@@ -228,10 +228,10 @@
!AbstractDirectoryBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.26 2013-06-07 09:58:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.27 2014-12-17 15:32:42 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.26 2013-06-07 09:58:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.27 2014-12-17 15:32:42 cg Exp $'
! !