--- a/Tools__NavigatorModel.st	Sun Jan 29 12:56:58 2012 +0000
+++ b/Tools__NavigatorModel.st	Sun Jan 29 15:33:37 2012 +0000
@@ -68,9 +68,11 @@
 markForBeingManagedBySVN: package
 
     | repo branch mark |    
-    self hasSubversionSupport ifFalse:[^''].
+
+    (ConfigurableFeatures includesFeature: #SubversionSupportEnabled) ifFalse:[^''].
     package = PackageId noProjectID ifTrue:[^''].
     
+    "/ use Smalltalk-at to trick the dependency/prerequisite generator
     repo := (Smalltalk at:#SVN::RepositoryManager) current 
                 repositoryForPackage: package onlyFromCache: true.
     repo ifNil:[^''].
@@ -80,6 +82,8 @@
     ^mark asText colorizeAllWith: Color gray
 
     "Created: / 06-04-2010 / 11:23:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (comment): / 07-09-2011 / 10:43:00 / cg"
+    "Modified: / 19-01-2012 / 10:44:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 markForBeingManagedBySVN: package branch: branch
@@ -107,6 +111,12 @@
     ^ '* all (%1) *'
 !
 
+nameListEntryForAnnotated
+    ^ '* annotated (%1) *'
+
+    "Created: / 07-09-2011 / 10:11:40 / cg"
+!
+
 nameListEntryForBookmarked
     ^ '* bookmarked (%1) *'
 !
@@ -228,17 +238,9 @@
 !
 
 pseudoEntryForegroundColor
-    |bg|
+    ^ UserPreferences current colorForPseudoProtocolsInMethodListInBrowser.
 
-    bg := SelectionInListView defaultBackgroundColor ? View defaultBackgroundColor.
-    bg isNil ifTrue:[ bg := View defaultBackgroundColor ].
-    (Color grey brightness - (bg brightness)) abs < 0.3 ifTrue:[
-        (bg brightness) > 0.7 ifTrue:[
-            ^ Color grey:20.
-        ].
-        ^ Color grey:80.
-    ].
-    ^ Color grey
+    "Modified: / 07-09-2011 / 09:59:55 / cg"
 ! !
 
 !NavigatorModel class methodsFor:'interface specs'!
@@ -309,10 +311,11 @@
 !NavigatorModel class methodsFor:'queries'!
 
 hasSubversionSupport
-
-    ^NewSystemBrowser hasSubversionSupport
+    ^ ConfigurableFeatures includesFeature: #SubversionSupportEnabled
 
     "Created: / 06-04-2010 / 11:09:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-09-2011 / 10:45:45 / cg"
+    "Modified: / 19-01-2012 / 10:43:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !NavigatorModel methodsFor:'misc'!
@@ -331,21 +334,24 @@
 !NavigatorModel methodsFor:'queries'!
 
 hasSubversionSupport
-    ^ self class hasSubversionSupport
+    ^ ConfigurableFeatures includesFeature: #SubversionSupportEnabled
+
+    "Modified: / 07-09-2011 / 10:45:49 / cg"
+    "Modified: / 19-01-2012 / 10:43:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !NavigatorModel class methodsFor:'documentation'!
 
 version
-    ^ '$Id: Tools__NavigatorModel.st 7810 2011-08-12 14:54:02Z vranyj1 $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigatorModel.st,v 1.21 2012/01/19 10:54:17 vrany Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/Tools_NavigatorModel.st,v 1.19 2011/07/20 16:44:23 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libtool/Tools_NavigatorModel.st,v 1.21 2012/01/19 10:54:17 vrany Exp §'
 !
 
 version_SVN
-    ^ '$Id: Tools__NavigatorModel.st 7810 2011-08-12 14:54:02Z vranyj1 $'
+    ^ '$Id: Tools__NavigatorModel.st 7851 2012-01-29 15:33:37Z vranyj1 $'
 ! !
 
-NavigatorModel initialize!
\ No newline at end of file
+NavigatorModel initialize!