Method.st
changeset 12508 471778ff6ccb
parent 12363 a7251dc427bd
child 12521 6e2416e82b83
--- a/Method.st	Fri Nov 06 00:19:10 2009 +0100
+++ b/Method.st	Fri Nov 06 11:23:52 2009 +0100
@@ -418,6 +418,9 @@
 
     source notNil ifTrue:[
         sourcePosition notNil ifTrue:[
+            "/ this looks wierd - but (self source) will retrieve the external source
+            "/ (from the file) and store it. So afterwards, we will have the string and
+            "/ sourcePosition will be nil
             self source:(self source)
         ]
     ].
@@ -2899,11 +2902,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.336 2009-10-26 17:10:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.337 2009-11-06 10:23:52 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.336 2009-10-26 17:10:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.337 2009-11-06 10:23:52 cg Exp $'
 ! !
 
 Method initialize!