--- a/SVN__Configuration.st	Mon Oct 03 18:23:01 2011 +0200
+++ b/SVN__Configuration.st	Wed Oct 05 14:43:08 2011 +0200
@@ -101,20 +101,22 @@
 !Configuration class methodsFor:'accessing'!
 
 configurations
-
-    Configurations ifNil:
-        [Configurations := UserPreferences current svnConfigurations2].
-    ^Configurations
+    Configurations isNil ifTrue:[
+        Configurations := UserPreferences current at:#svnConfigurations2 ifAbsent:#()
+    ].
+    ^ Configurations
 
     "Created: / 09-01-2010 / 15:46:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 11-02-2010 / 18:55:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 05-10-2011 / 14:37:40 / cg"
 !
 
 configurations: aCollection"of Configuration"
 
-    UserPreferences current svnConfigurations2: aCollection
+    UserPreferences current at:#svnConfigurations2 put:aCollection
 
     "Created: / 11-02-2010 / 16:17:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 05-10-2011 / 14:36:49 / cg"
 !
 
 current