--- a/WinPrinterContext.st	Thu Jan 30 12:49:12 2020 +0100
+++ b/WinPrinterContext.st	Mon Feb 03 19:20:38 2020 +0100
@@ -4913,23 +4913,23 @@
     index <= 0 ifTrue:[ ^ 0 ].
     str := index >= aString size ifTrue:[ aString ] ifFalse:[ aString copyFrom:1 to:index ].
     true "self font isNil" ifTrue:[
-	"if font not set yet, calculate based on default font"
-	"/            extString := str asExternalString.
-	size := Win32OperatingSystem::WinPointStructure new.
-	(OperatingSystem
-	    getTextExtentPoint:gcId
-	    string:str
-	    size:size) ifFalse:[ ^ self error ].
-	answer := size x.
+        " if font not set yet, calculate based on the default font"
+        "/            extString := str asExternalString.
+        size := Win32OperatingSystem::WinPointStructure new.
+        (OperatingSystem
+            getTextExtentPoint:gcId
+            string:str
+            size:size) ifFalse:[ ^ self error ].
+        answer := size x.
 "/        Transcript showCR: 'FROM PRIM ******* ', str, '   ',  answer printString.
 "/        Transcript showCR: 'FROM DEVICE ***** ', str, '   ',(self font widthOf:str on:self device) printString.
-	#TODO.
+        #TODO.
     ] ifFalse:[
-	answer := self font widthOf:str on:self device
+        answer := self font widthOf:str on:self device
     ].
     index > aString size ifTrue:[
-	spaceWidth := self font widthOf:Character space on:self device.
-	answer := answer + ((index - aString size) * spaceWidth)
+        spaceWidth := self font widthOf:Character space on:self device.
+        answer := answer + ((index - aString size) * spaceWidth)
     ].
     ^ answer.