#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Tue, 31 May 2016 16:00:26 +0200
changeset 19918 49dd92f59382
parent 19917 b273314a4ef7
child 19919 298d23c7785b
#FEATURE by cg class: UserPreferences added: #setCurrent:
UserPreferences.st
--- a/UserPreferences.st	Tue May 31 15:37:51 2016 +0200
+++ b/UserPreferences.st	Tue May 31 16:00:26 2016 +0200
@@ -163,6 +163,12 @@
     CurrentPreferences := nil
 !
 
+setCurrent:preferencesInstance
+    "sets the CurrentPreferences to preferencesInstance"
+
+    CurrentPreferences := preferencesInstance
+!
+
 syntaxColorKeys
     "returns the keys of syntax color items"