--- a/WinPrinterContext.st	Mon Jul 18 14:14:06 2016 +0200
+++ b/WinPrinterContext.st	Tue Jul 19 21:45:55 2016 +0200
@@ -9,6 +9,8 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
+'From Smalltalk/X, Version:7.1.0.0 on 18-07-2016 at 13:47:02'                   !
+
 "{ Package: 'stx:libview2' }"
 
 "{ NameSpace: Smalltalk }"
@@ -22,7 +24,7 @@
 
 WinPrinterContext subclass:#WinPrinterGraphicContext
 	instanceVariableNames:'fontScale printPageNumbers pageNumberFormat pageCounter
-		needsEndOfPage titleFont'
+		needsEndOfPage titleFont width height'
 	classVariableNames:''
 	poolDictionaries:''
 	privateIn:WinPrinterContext
@@ -294,7 +296,7 @@
     gc := WinPrinterGraphicContext fromPrinterInfo:printerInfo.
 
     gc notNil ifTrue:[
-        gc startPrintJob:jobName
+	gc startPrintJob:jobName
     ].
     ^ gc
 ! !
@@ -5689,6 +5691,14 @@
     ^ 50
 !
 
+extent
+    ^ width @ height
+!
+
+height
+    ^ height
+!
+
 leftMargin
     "return the papers left margin measured in pixels"
 
@@ -5705,6 +5715,10 @@
     "return the papers top margin measured in pixels"
 
     ^ 50
+!
+
+width
+    ^ width
 ! !
 
 !WinPrinterContext::WinPrinterGraphicContext methodsFor:'accessing-hooks'!