win32: fix printing bug related to clipping

This commit is contained in:
Matthew Flatt 2011-01-27 12:07:03 -07:00
parent efb66b0cc4
commit d34deeba91

View File

@ -237,7 +237,7 @@
(class (dc-mixin default-dc-backend%) (class (dc-mixin default-dc-backend%)
(super-new) (super-new)
(define/override (init-cr-matrix cr) (define/override (init-cr-matrix cr)
(set-point-scale hdc cr)) (set-point-scale hdc cr margin-left margin-top))
(define/override (get-cr) cr)))) (define/override (get-cr) cr))))
(cairo_destroy cr) (cairo_destroy cr)
(cairo_surface_destroy s)) (cairo_surface_destroy s))