added: #useCodeView2InTools
authorClaus Gittinger <cg@exept.de>
Thu, 06 Oct 2011 11:46:28 +0200
changeset 10757 5bbe8b995a5f
parent 10756 eaa975e29a38
child 10758 ff53b3b590a7
added: #useCodeView2InTools changed: #userPreferencesAspectList
AbstractFileBrowser.st
--- a/AbstractFileBrowser.st	Thu Oct 06 11:44:43 2011 +0200
+++ b/AbstractFileBrowser.st	Thu Oct 06 11:46:28 2011 +0200
@@ -542,9 +542,10 @@
            sortDirectoriesBeforeFiles  true
            openAlwaysInTextEditor      false
            sortCaseless                false
+           useCodeView2InTools         true
       )
 
-    "Modified: / 03-04-2007 / 08:47:45 / cg"
+    "Modified: / 06-10-2011 / 11:30:09 / cg"
 ! !
 
 !AbstractFileBrowser class methodsFor:'help specs'!
@@ -3462,6 +3463,12 @@
     "Created: / 27-06-2011 / 16:02:59 / cg"
 !
 
+useCodeView2InTools
+    ^ self aspectFor:#useCodeView2InTools ifAbsent:[ UserPreferences current useCodeView2InTools asValue ].
+
+    "Created: / 06-10-2011 / 11:45:58 / cg"
+!
+
 userContextAvailable
 
     " aspect for show group and user columns in contents view
@@ -7512,7 +7519,6 @@
     ^ false
 ! !
 
-
 !AbstractFileBrowser methodsFor:'presentation'!
 
 getModeString:modeBits
@@ -8434,9 +8440,9 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.470 2011-10-04 11:41:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.471 2011-10-06 09:46:28 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.470 2011-10-04 11:41:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.471 2011-10-06 09:46:28 cg Exp $'
 ! !