--- a/DiffTextView.st	Mon Nov 20 12:34:09 2006 +0100
+++ b/DiffTextView.st	Mon Nov 20 13:18:15 2006 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libtool' }"
 
 TwoColumnTextView subclass:#DiffTextView
@@ -357,11 +356,18 @@
                     self error:'oops - funny line (includes returns) in text'.
                 ]
             ].
+            lOut bitsPerCharacter > 8 ifTrue:[
+                (lOut first = (Character value:16rFEFF)) ifTrue:[
+                    lOut := (lOut copyFrom:2) asSingleByteStringIfPossible.
+                ].
+            ].
             stream nextPutAll:lOut.
         ].
         stream cr
     ].
     stream close.
+
+    "Modified: / 20-11-2006 / 13:12:12 / cg"
 !
 
 updateListsFrom:text1 and:text2 diffs:diffList
@@ -662,5 +668,5 @@
 !DiffTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.45 2006-09-18 11:12:34 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.46 2006-11-20 12:18:15 cg Exp $'
 ! !