--- a/PrinterStream.st	Mon Sep 11 20:09:01 2000 +0200
+++ b/PrinterStream.st	Thu Oct 19 14:11:28 2000 +0200
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libbasic2' }"
+
 PipeStream subclass:#PrinterStream
 	instanceVariableNames:'native pageFormat underline strikeout'
 	classVariableNames:'DefaultPageFormat'
@@ -514,6 +516,10 @@
 
     |lastE|
 
+    native == true ifTrue:[
+        ^ super nextPutAll:aCollection.
+    ].
+
     aCollection hasChangeOfEmphasis ifTrue:[
         aCollection keysAndValuesDo:[:idx :aChar |
             |e|
@@ -744,9 +750,8 @@
 !
 
 setNative
-    native := true
+    self setNative:true
 
-    "Created: 10.4.1996 / 13:05:01 / cg"
 !
 
 setNative:aBoolean
@@ -852,6 +857,6 @@
 !PrinterStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.52 2000-02-07 19:26:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.53 2000-10-19 12:11:10 stefan Exp $'
 ! !
 PrinterStream initialize!