class: Autoload
authorClaus Gittinger <cg@exept.de>
Wed, 03 Apr 2013 21:57:42 +0200
changeset 15056 7ee92e75b2c4
parent 15055 99961534feb1
child 15057 3e959aee9cd4
class: Autoload changed: #autoload
Autoload.st
--- 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 $'
 ! !