ChangesBrowser.st
changeset 9718 e6466884cb4e
parent 9715 3be7736915bb
child 9888 ae852239c170
--- a/ChangesBrowser.st	Sat Jan 29 12:59:19 2011 +0100
+++ b/ChangesBrowser.st	Sat Jan 29 12:59:48 2011 +0100
@@ -1733,7 +1733,10 @@
     selector == #'instanceVariableNames:' ifTrue:[
         receiver isMessage ifTrue:[
             receiver selector == #class ifTrue:[
-                thisClass := receiver evaluate.
+                Parser undefinedVariableError handle:[:ex |
+                ] do:[
+                    thisClass := receiver evaluate.
+                ].
                 thisClass isBehavior ifTrue:[
                     thisClass isLoaded ifTrue:[
 "/                                varsHere := thisClass instanceVariableString asCollectionOfWords.
@@ -1804,7 +1807,7 @@
 
     ^ nil.
 
-    "Modified: / 29-01-2011 / 11:24:09 / cg"
+    "Modified: / 29-01-2011 / 11:51:28 / cg"
 !
 
 parseExpression:chunk
@@ -6176,9 +6179,9 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.410 2011-01-29 10:24:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.411 2011-01-29 11:59:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.410 2011-01-29 10:24:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.411 2011-01-29 11:59:48 cg Exp $'
 ! !