*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 16 Apr 2007 13:04:45 +0200
changeset 2304 f39eb95d4d48
parent 2303 06b20d5a52da
child 2305 c48460cc1001
*** empty log message ***
WinPrinterContext.st
--- a/WinPrinterContext.st	Mon Apr 16 13:04:38 2007 +0200
+++ b/WinPrinterContext.st	Mon Apr 16 13:04:45 2007 +0200
@@ -68,23 +68,6 @@
 
 !WinPrinterContext class methodsFor:'accessing'!
 
-defaultPrinterName
-    "Answer the name of the default printer, or nil if none."
-    
-    |printerInfo printerName|
-
-    printerInfo := OperatingSystem getDefaultPrinterName.
-    printerName := (printerInfo copyFrom:1 to:(printerInfo indexOf:$,) - 1) trimBlanks.
-    ^ printerName size == 0 ifTrue:[ nil ] ifFalse:[ printerName ]
-
-    "
-     PrinterContext defaultPrinterName
-    "
-
-    "Modified: / 02-08-2006 / 17:26:09 / fm"
-    "Modified: / 10-10-2006 / 17:32:45 / cg"
-!
-
 getPrinterInformation:printerNameString 
     " Answer the printer information for the printer named printerNameString.  If no name is specified,
       answer the information for the default printer."
@@ -616,5 +599,5 @@
 !WinPrinterContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WinPrinterContext.st,v 1.2 2007-04-16 10:56:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WinPrinterContext.st,v 1.3 2007-04-16 11:04:45 cg Exp $'
 ! !