--- a/Workspace.st	Wed Jun 26 23:23:09 2019 +0200
+++ b/Workspace.st	Wed Jun 26 23:25:11 2019 +0200
@@ -1553,7 +1553,7 @@
 initialize
     super initialize.
 
-    autoIndent := UserPreferences current autoIndentInCodeView.
+    autoIndent := (UserPreferences current autoIndentInCodeView) asValue.
     scrollWhenUpdating := #beginOfText.
     showMatchingParenthesis := true.
     allowValueDrop := true.
@@ -1567,6 +1567,7 @@
     self initializeDragAndDrop.
 
     "Modified: / 28-11-2006 / 16:11:55 / cg"
+    "Modified: / 26-06-2019 / 23:18:49 / Claus Gittinger"
 !
 
 initializeDoITAction