win64: fix PrintDlg alignment

2011-01-13 18:53:48 -07:00 · 2011-01-13 18:53:48 -07:00 · 4f292a95c5
commit 4f292a95c5
parent 255cb84b87
2 changed files with 2 additions and 1 deletions
--- a/collects/mred/private/wx/win32/printer-dc.rkt
+++ b/collects/mred/private/wx/win32/printer-dc.rkt
@ -56,7 +56,7 @@
   [lpSetupTemplateName _pointer]
   [hPrintTemplate _HGLOBAL]
   [hSetupTemplate _HGLOBAL])
-  #:alignment 2)
+  #:alignment (if is-win64? #f 2))

 (define-cstruct _DOCINFO
  ([cbSize _int]
--- a/collects/mred/private/wx/win32/utils.rkt
+++ b/collects/mred/private/wx/win32/utils.rkt
@ -16,6 +16,7 @@
              define-uxtheme
              define-winmm
              failed
+	      is-win64?

              GetLastError