--- a/PrinterStream.st	Sat Jun 01 00:32:30 1996 +0200
+++ b/PrinterStream.st	Sat Jun 01 00:49:58 1996 +0200
@@ -19,6 +19,20 @@
 
 PrinterStream class instanceVariableNames:'PrintCommand DefaultCommands PageFormat LeftMargin DefaultPageFormats
 	Landscape'
+
+"
+ The following class instance variables are inherited by this class:
+
+	PipeStream - 
+	NonPositionableExternalStream - 
+	ExternalStream - 
+	ReadWriteStream - 
+	WriteStream - 
+	PositionableStream - 
+	PeekableStream - 
+	Stream - 
+	Object - 
+"
 !
 
 !PrinterStream class methodsFor:'documentation'!
@@ -138,6 +152,12 @@
     "
 
     "Modified: 1.6.1996 / 00:20:15 / cg"
+!
+
+reInitPage
+    "nothing done here"
+
+    "Created: 1.6.1996 / 00:49:40 / cg"
 ! !
 
 !PrinterStream class methodsFor:'instance creation'!
@@ -252,7 +272,10 @@
 landscape:aBoolean
     "set/clear landscape printing"
 
-    Landscape := aBoolean
+    Landscape := aBoolean.
+    self reInitPage.
+
+    "Modified: 1.6.1996 / 00:49:22 / cg"
 !
 
 leftMargin
@@ -295,12 +318,14 @@
      that symbol, in order for printing to be correct.
 
      This list can be set from the startup script with:
-	PrinterStream defaultPageFormat:#...
+        PrinterStream defaultPageFormat:#...
      or via the launchers settings menu."
 
-    PageFormat := aSymbol
+    PageFormat := aSymbol.
+    self reInitPage.
 
     "Created: 23.4.1996 / 18:25:18 / cg"
+    "Modified: 1.6.1996 / 00:49:06 / cg"
 !
 
 printCommand
@@ -608,6 +633,6 @@
 !PrinterStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.29 1996-05-31 22:28:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.30 1996-05-31 22:49:47 cg Exp $'
 ! !
 PrinterStream initialize!