--- a/ClassCategoryReader.st Wed Oct 31 17:49:25 2012 +0000
+++ b/ClassCategoryReader.st Wed Oct 31 18:09:01 2012 +0000
@@ -326,6 +326,11 @@
(compiler respondsTo:#compile:forClass:inCategory:notifying:install:skipIfSame:silent:)
ifTrue:[
"/ ST/X's compiler
+
+ "JV@2012-10-31: Here, we don't want to correct nor define
+ undeclared variable, When a code is loaded from a Workspace,
+ all not-yet-loaded classes in namespace would become
+ Workspace variables which is wrong!!"
[
method := compiler
compile:aString
@@ -386,6 +391,7 @@
"Created: / 17-05-1998 / 19:56:32 / cg"
"Modified: / 31-07-2011 / 09:30:07 / cg"
"Modified: / 26-10-2012 / 12:55:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified (format): / 31-10-2012 / 18:10:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
fileInFrom:aStream silent:beSilent
@@ -445,11 +451,11 @@
!ClassCategoryReader class methodsFor:'documentation'!
version
- ^ '$Id: ClassCategoryReader.st 10856 2012-10-29 17:05:17Z vranyj1 $'
+ ^ '$Id: ClassCategoryReader.st 10861 2012-10-31 18:09:01Z vranyj1 $'
!
version_SVN
- ^ '$Id: ClassCategoryReader.st 10856 2012-10-29 17:05:17Z vranyj1 $'
+ ^ '$Id: ClassCategoryReader.st 10861 2012-10-31 18:09:01Z vranyj1 $'
! !
ClassCategoryReader initialize!