--- a/BrowserView.st	Fri Apr 07 10:06:57 2000 +0200
+++ b/BrowserView.st	Tue Apr 11 12:20:31 2000 +0200
@@ -5410,7 +5410,7 @@
     s := TextStream on:''.
 
     isNameSpace ifTrue:[
-        s nextPutAll:'Namespace name:''NewNameSpace'''.
+        s nextPutAll:'NameSpace name:''NewNameSpace'''.
         s cr; cr.
         s emphasis:(UserPreferences current commentEmphasisAndColor).
         s nextPutAll:'"
@@ -5430,7 +5430,7 @@
 
     withNameSpaceDirective ifTrue:[
         className := aSuperClass nameWithoutNameSpacePrefix.
-        s nextPutAll:('"{ Namespace: ''' , currentNamespace name , ''' }"').
+        s nextPutAll:('"{ NameSpace: ''' , currentNamespace name , ''' }"').
         s cr; cr.
     ] ifFalse:[    
         className := aSuperClass name.
@@ -14067,6 +14067,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.616 2000-03-30 14:29:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.617 2000-04-11 10:20:31 ca Exp $'
 ! !
 BrowserView initialize!