--- a/WinPrinterContext.st	Sat Nov 21 00:32:26 2015 +0100
+++ b/WinPrinterContext.st	Thu Nov 26 14:48:56 2015 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libview2' }"
 
+"{ NameSpace: Smalltalk }"
+
 PrinterContext subclass:#WinPrinterContext
 	instanceVariableNames:'deviceFonts hatch supportsColor'
 	classVariableNames:'PostScriptBlackWhite'
@@ -272,7 +274,7 @@
 
     printerInfo := PrintingDialog getPrinterInfo.
     printerInfo isNil ifTrue:[^self].
-    printer := WinPrinterContext fromPrinterInfo: printerInfo.
+    printer := self fromPrinterInfo: printerInfo.
     ^ printer
 !
 
@@ -281,6 +283,10 @@
 !
 
 openGraphicContextWithoutDialog:withoutDialog
+    ^ self openGraphicContextWithoutDialog:withoutDialog jobName:nil
+!
+
+openGraphicContextWithoutDialog:withoutDialog jobName:jobName
     |printerInfo gc|
 
     printerInfo := PrintingDialog getPrinterInfoWithoutDialog:withoutDialog.
@@ -288,7 +294,7 @@
     gc := WinPrinterGraphicContext fromPrinterInfo:printerInfo.
 
     gc notNil ifTrue:[
-	gc startPrintJob
+        gc startPrintJob:jobName
     ].
     ^ gc
 ! !
@@ -6065,10 +6071,10 @@
 !WinPrinterContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WinPrinterContext.st,v 1.44 2013-07-04 10:57:17 mb Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/WinPrinterContext.st,v 1.44 2013-07-04 10:57:17 mb Exp $'
+    ^ '$Header$'
 ! !