DiffTextView.st
changeset 16744 072de442c2fa
parent 16329 8727c046cfe7
child 16748 62486fba2d74
child 17396 cdea4100c71b
--- a/DiffTextView.st	Wed Jul 20 11:35:57 2016 +0200
+++ b/DiffTextView.st	Wed Jul 20 11:36:02 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
@@ -250,30 +252,30 @@
     showSeparators := false.
 
     (useColors := device hasColors) ifTrue:[
-        addedColor := Color white.
+        addedColor := self whiteColor.
         addedBgColor := Color red.
 
-        removedColor := Color black.
+        removedColor := self blackColor.
         removedBgColor := Color green.
 
-        changedColor := Color white.
+        changedColor := self whiteColor.
         changedBgColor := Color blue.
 
-        changedSpacesOnlyColor := Color white.
+        changedSpacesOnlyColor := self whiteColor.
         changedSpacesOnlyBgColor := Color blue lightened.
     ] ifFalse:[
         showSeparators := true.
 
         (useColors := device hasGreyscales) ifTrue:[
             addedBgColor := removedBgColor := changedBgColor := Color grey:80.
-            addedColor := removedColor := changedColor := Color black.
+            addedColor := removedColor := changedColor := self blackColor.
         ] ifFalse:[
-            addedBgColor := removedBgColor := changedBgColor := Color black.
-            addedColor := removedColor := changedColor := Color white.
+            addedBgColor := removedBgColor := changedBgColor := self blackColor.
+            addedColor := removedColor := changedColor := self whiteColor.
         ].
 
-        changedSpacesOnlyColor := Color white.
-        changedSpacesOnlyBgColor := Color black.
+        changedSpacesOnlyColor := self whiteColor.
+        changedSpacesOnlyBgColor := self blackColor.
     ].
 
     "Created: 16.11.1995 / 16:59:48 / cg"