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

racket/draw: fix bad rounding of paper sizes in points

Browse Source
This commit is contained in:
Matthew Flatt 2014-06-29 09:59:37 +01:00
parent 393d7d49fc
commit 646b836183
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pkgs/draw-pkgs/draw-lib/racket/draw/private/ps-setup.rkt
View File

@ -18,9 +18,9 @@
(define paper-sizes
'(("A4 210 x 297 mm" 595 842)
("A3 297 x 420 mm" 842 1191)
("Letter 8 1/2 x 11 in" 612 791)
("Legal 8 1/2 x 14 in" 612 1009)))
("A3 297 x 420 mm" 842 1190)
("Letter 8 1/2 x 11 in" 612 792)
("Legal 8 1/2 x 14 in" 612 1008)))
(define (paper-name-string? s)
(and (string? s)