UserPreferences.st
changeset 12026 015d0cc02cf9
parent 11983 1cbdd1c24ea5
child 12027 db0b75066a40
--- a/UserPreferences.st	Thu Sep 24 11:27:13 2009 +0200
+++ b/UserPreferences.st	Thu Sep 24 11:54:27 2009 +0200
@@ -2630,6 +2630,62 @@
     ^ self at:#verboseBacktraceInDebugger put:aBoolean
 ! !
 
+!UserPreferences methodsFor:'accessing-subversion'!
+
+svnConfigurations
+
+    ^(self at:#'libsvn.configurations' ifAbsent:#())
+	collect:[:cfg|cfg decodeAsLiteralArray]
+
+    "Created: / 03-10-2008 / 11:14:14 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 19-08-2009 / 12:08:44 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+svnConfigurations: aCollection
+
+    "
+	UserPreferences current svnConfigurations: #()
+    "
+
+    SVN::RepositoryManager allInstances do:
+	[:e|e configurations: aCollection].
+
+    ^self
+	at: #'libsvn.configurations'
+	put: (aCollection asArray collect:[:cfg|cfg literalArrayEncoding])
+
+    "Created: / 03-10-2008 / 11:14:01 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 19-08-2009 / 12:09:22 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+svnEnabled
+
+    ^self at:#svnEnabled ifAbsent:[true]
+
+    "Created: / 03-10-2008 / 11:11:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+svnEnabled: aBoolean
+
+    ^self at:#svnEnabled put: aBoolean
+
+    "Created: / 03-10-2008 / 11:13:14 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+svnVerbose
+
+    ^self at:#svnVerbose ifAbsent: false
+
+    "Created: / 19-03-2009 / 14:00:05 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+svnVerbose: aBoolean
+
+    ^self at:#svnVerbose put: aBoolean
+
+    "Created: / 19-03-2009 / 13:59:46 / Jan Vrany <vranyj1@fel.cvut.cz>"
+! !
+
 !UserPreferences methodsFor:'default settings'!
 
 listOfPredefinedSyntaxColoringSchemes
@@ -2820,5 +2876,5 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.220 2009-09-21 12:22:26 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.221 2009-09-24 09:54:27 cg Exp $'
 ! !