equal
deleted
inserted
replaced
318 ]. |
318 ]. |
319 ]. |
319 ]. |
320 |
320 |
321 "load it" |
321 "load it" |
322 (Object infoPrinting and:[Smalltalk silentLoading ~~ true]) ifTrue:[ |
322 (Object infoPrinting and:[Smalltalk silentLoading ~~ true]) ifTrue:[ |
323 thisContext fullPrintAll. |
323 "/ thisContext fullPrintAll. |
324 Transcript showCR:('autoloading ', myName , ' ...'); endEntry. |
324 Transcript showCR:('autoloading ', myName , ' ...'); endEntry. |
325 ]. |
325 ]. |
326 |
326 |
327 packageID := self package. |
327 packageID := self package. |
328 "is there a package-definition ?" |
328 "is there a package-definition ?" |
474 |
474 |
475 Smalltalk changed:#classDefinition with:newClass. |
475 Smalltalk changed:#classDefinition with:newClass. |
476 self changed:#loaded with:newClass. |
476 self changed:#loaded with:newClass. |
477 ^ newClass |
477 ^ newClass |
478 |
478 |
479 "Modified: / 23-10-2006 / 16:44:08 / cg" |
479 "Modified: / 23-10-2006 / 18:12:21 / cg" |
480 ! ! |
480 ! ! |
481 |
481 |
482 !Autoload class methodsFor:'message catching'! |
482 !Autoload class methodsFor:'message catching'! |
483 |
483 |
484 at:arg |
484 at:arg |
905 ! ! |
905 ! ! |
906 |
906 |
907 !Autoload class methodsFor:'documentation'! |
907 !Autoload class methodsFor:'documentation'! |
908 |
908 |
909 version |
909 version |
910 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.142 2006-10-23 14:43:51 cg Exp $' |
910 ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.143 2006-10-23 16:12:12 cg Exp $' |
911 ! ! |
911 ! ! |
912 |
912 |
913 Autoload initialize! |
913 Autoload initialize! |