--- a/Autoload.st Wed Apr 03 21:12:25 2013 +0200
+++ b/Autoload.st Wed Apr 03 21:57:42 2013 +0200
@@ -384,10 +384,10 @@
|classFileName|
classFileName := self classFilename.
- (classFilename notNil and:[classFilename asFilename isAbsolute]) ifTrue:[
+ (classFileName notNil and:[classFileName asFilename isAbsolute]) ifTrue:[
"/ if filename is absolute, the autoload-class was created by an
"/ explicit install-as-autoloaded via the fileBrowser.
- Smalltalk fileIn:classFilename lazy:false silent:nil.
+ Smalltalk fileIn:classFileName lazy:false silent:nil.
] ifFalse:[
(Smalltalk
fileInClass:myName
@@ -810,11 +810,11 @@
!Autoload class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.163 2013-04-03 18:53:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.164 2013-04-03 19:57:42 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.163 2013-04-03 18:53:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.164 2013-04-03 19:57:42 cg Exp $'
! !