FileBasedSourceCodeManager.st
changeset 2699 fb70a72730fd
parent 2685 871ba59d122c
child 2704 f50d38caa113
--- a/FileBasedSourceCodeManager.st	Mon Jan 09 00:43:52 2012 +0100
+++ b/FileBasedSourceCodeManager.st	Mon Jan 09 00:45:24 2012 +0100
@@ -13,7 +13,7 @@
 
 AbstractSourceCodeManager subclass:#FileBasedSourceCodeManager
 	instanceVariableNames:''
-	classVariableNames:'Verbose RepositoryPath ModulePathes'
+	classVariableNames:'Verbose RepositoryPath ModulePathes ShownInBrowserMenus'
 	poolDictionaries:''
 	category:'System-SourceCodeManagement'
 !
@@ -107,6 +107,18 @@
     RepositoryPath := aPath
 
     "Created: / 22-12-2011 / 00:30:19 / cg"
+!
+
+shownInBrowserMenus
+    ^ ShownInBrowserMenus ? true
+
+    "Created: / 08-01-2012 / 19:53:20 / cg"
+!
+
+shownInBrowserMenus:aBoolean
+    ShownInBrowserMenus := aBoolean
+
+    "Created: / 08-01-2012 / 19:53:34 / cg"
 ! !
 
 !FileBasedSourceCodeManager class methodsFor:'queries'!
@@ -512,11 +524,11 @@
 !FileBasedSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/FileBasedSourceCodeManager.st,v 1.3 2011-12-25 23:50:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/FileBasedSourceCodeManager.st,v 1.4 2012-01-08 23:45:24 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/FileBasedSourceCodeManager.st,v 1.3 2011-12-25 23:50:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/FileBasedSourceCodeManager.st,v 1.4 2012-01-08 23:45:24 cg Exp $'
 !
 
 version_FileRepository