suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

win32: fix(?) printing page-size calculation when in 100*mm

Browse Source 
Windows provide page metrics in either 1000ths of inches or
100ths of millimeters. I think Racket's calculation was wrong
in the mm case.

original commit: 4f75350bf3b8e45ebe8c92388ffa83855e56c5aa
This commit is contained in:
Matthew Flatt 2012-09-19 08:40:24 -06:00
parent 7927d529d4
commit 26e6d12ef9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mred/private/wx/win32/printer-dc.rkt
View File

@ -168,7 +168,7 @@
(let ([scale (if (zero? (bitwise-and (PAGESETUPDLG-Flags page-setup)
PSD_INTHOUSANDTHSOFINCHES))
;; 100ths of mm
(/ SCREEN-DPI (* 10.0 2.54))
(/ SCREEN-DPI (* 1000.0 2.54))
;; 1000ths of in
(/ SCREEN-DPI 1000.0))]
[r (PAGESETUPDLG-rtMargin page-setup)]