--- a/DiffTextView.st	Tue Feb 18 15:20:48 2014 +0100
+++ b/DiffTextView.st	Tue Feb 18 15:30:56 2014 +0100
@@ -245,7 +245,7 @@
 
     showSeparators := false.
 
-    (useColors := device hasColors) ifTrue:[
+    (useColors := self graphicsDevice hasColors) ifTrue:[
         addedColor := Color white.
         addedBgColor := Color red.
 
@@ -260,7 +260,7 @@
     ] ifFalse:[
         showSeparators := true.
 
-        (useColors := device hasGreyscales) ifTrue:[
+        (useColors := self graphicsDevice hasGreyscales) ifTrue:[
             addedBgColor := removedBgColor := changedBgColor := Color grey:80.
             addedColor := removedColor := changedColor := Color black.
         ] ifFalse:[
@@ -661,10 +661,10 @@
 !DiffTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.62 2014-02-05 13:29:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.63 2014-02-18 14:30:56 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.62 2014-02-05 13:29:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.63 2014-02-18 14:30:56 stefan Exp $'
 ! !