--- a/DebugView.st	Fri Apr 17 18:54:32 1998 +0200
+++ b/DebugView.st	Fri Apr 17 21:00:31 1998 +0200
@@ -3688,6 +3688,10 @@
                     codeView contents:nil.
                 ]
             ] ifFalse:[
+                UserPreferences current syntaxColoring ifTrue:[
+                    code := SyntaxHighlighter formatMethod:code in:implementorClass.
+                ].
+
                 code ~= (codeView contents) ifTrue:[codeView contents:code].
 
                 (lineNrInMethod notNil and:[lineNrInMethod ~~ 0]) ifTrue:[
@@ -3782,12 +3786,12 @@
     ]
 
     "Created: / 14.8.1997 / 20:15:00 / cg"
-    "Modified: / 19.1.1998 / 18:00:10 / cg"
+    "Modified: / 17.4.1998 / 20:59:39 / cg"
 ! !
 
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.194 1998-04-07 13:11:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.195 1998-04-17 19:00:31 cg Exp $'
 ! !
 DebugView initialize!