--- a/StoreSourceCodeManager.st	Mon Jan 09 01:04:48 2012 +0100
+++ b/StoreSourceCodeManager.st	Mon Jan 09 01:05:54 2012 +0100
@@ -13,7 +13,8 @@
 
 AbstractSourceCodeManager subclass:#StoreSourceCodeManager
 	instanceVariableNames:''
-	classVariableNames:'Verbose Connection DefaultDBInfo DBInfoPerModule'
+	classVariableNames:'Verbose Connection DefaultDBInfo DBInfoPerModule
+		ShownInBrowserMenus'
 	poolDictionaries:''
 	category:'System-SourceCodeManagement'
 !
@@ -153,6 +154,18 @@
     ^ self shouldImplement
 !
 
+shownInBrowserMenus
+    ^ ShownInBrowserMenus ? true
+
+    "Created: / 08-01-2012 / 19:53:20 / cg"
+!
+
+shownInBrowserMenus:aBoolean
+    ShownInBrowserMenus := aBoolean
+
+    "Created: / 08-01-2012 / 19:53:34 / cg"
+!
+
 userName
     ^ self defaultDBInfo userName
 !
@@ -446,5 +459,5 @@
 !StoreSourceCodeManager class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/StoreSourceCodeManager.st,v 1.20 2011-12-04 14:36:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/StoreSourceCodeManager.st,v 1.21 2012-01-09 00:05:54 cg Exp $'
 ! !