--- a/BrowserView.st	Tue Mar 30 20:49:09 2004 +0200
+++ b/BrowserView.st	Tue Mar 30 20:52:23 2004 +0200
@@ -3905,7 +3905,7 @@
         |s|
 
         s := WriteStream on:(String new).
-        currentClass fileOutClassInstVarDefinitionOn:s withNameSpace:true.
+        currentClass class fileOutClassInstVarDefinitionOn:s withNameSpace:true.
         codeView contents:(s contents).
         codeView modified:false.
         codeModified := false.
@@ -14632,7 +14632,7 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.773 2004-03-17 16:18:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.774 2004-03-30 18:52:23 cg Exp $'
 ! !
 
 BrowserView initialize!