added:
authorClaus Gittinger <cg@exept.de>
Thu, 19 Nov 2009 14:26:27 +0100
changeset 12562 44c6c9d39062
parent 12561 3ddfe512ada9
child 12563 739edda3428d
added: #soapLoggingLevel #soapLoggingLevel:
UserPreferences.st
--- a/UserPreferences.st	Thu Nov 19 12:52:09 2009 +0100
+++ b/UserPreferences.st	Thu Nov 19 14:26:27 2009 +0100
@@ -680,6 +680,14 @@
     "
 
     "Created: / 20-09-2007 / 15:59:58 / cg"
+!
+
+soapLoggingLevel
+    ^ self at:#soapLoggingLevel ifAbsent:nil
+!
+
+soapLoggingLevel:anIntegerBetween0_and_3
+    ^ self at:#soapLoggingLevel put:anIntegerBetween0_and_3
 ! !
 
 !UserPreferences methodsFor:'accessing-pref''d tools'!
@@ -3018,9 +3026,9 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.238 2009-11-11 13:36:44 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.239 2009-11-19 13:26:27 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.238 2009-11-11 13:36:44 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.239 2009-11-19 13:26:27 cg Exp $'
 ! !