--- a/UserPreferences.st	Thu Jun 07 11:08:32 2012 +0200
+++ b/UserPreferences.st	Sun Jun 10 18:37:48 2012 +0200
@@ -3469,6 +3469,22 @@
     "Modified: / 11.9.1998 / 00:09:59 / cg"
 !
 
+hideEnumerationCodeInDebugger
+    ^ self at:#hideEnumerationCodeInDebugger ifAbsent:true
+
+    "
+     UserPreferences current hideEnumerationCodeInDebugger
+    "
+
+    "Created: / 09-06-2012 / 15:28:38 / cg"
+!
+
+hideEnumerationCodeInDebugger:aBooleanOrNil
+    ^ self at:#hideEnumerationCodeInDebugger put:aBooleanOrNil
+
+    "Created: / 10-06-2012 / 18:37:12 / cg"
+!
+
 infoVisibleInWorkspace
     "return the flag which defaults the info-visibility in a workspace application"
 
@@ -3945,11 +3961,11 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.307 2012-05-16 19:31:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.308 2012-06-10 16:37:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.307 2012-05-16 19:31:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.308 2012-06-10 16:37:48 cg Exp $'
 !
 
 version_SVN