--- a/WinPrinterStream.st	Tue Jul 03 15:18:40 2007 +0200
+++ b/WinPrinterStream.st	Wed Jul 04 16:37:15 2007 +0200
@@ -42,7 +42,11 @@
     | printerContext |
 
     PrinterInfo := PrintingDialog getPrinterInfo.
-    PrinterInfo isNil ifTrue:[^nil].
+    PrinterInfo isNil ifTrue:[
+        "/ cancelled
+        AbortSignal raiseRequest.
+        ^nil
+    ].
 
     printerContext := WinPrinterContext fromPrinterInfo: PrinterInfo.
 
@@ -283,5 +287,5 @@
 !WinPrinterStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WinPrinterStream.st,v 1.3 2007-04-16 11:02:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WinPrinterStream.st,v 1.4 2007-07-04 14:37:15 cg Exp $'
 ! !