Thank you, it's working :-)
Am Dienstag, 20. November 2012 schrieb Matthew Flatt:
> I've pushed a repair for this bug to the git repo. Meanwhile, a
> workaround is to wrap the `end-doc' call as
>
> (with-handlers ([exn:fail:contract? void])
>(send dc end-doc))
>
> At Tue, 20 Nov 2012 09:20:06
I've pushed a repair for this bug to the git repo. Meanwhile, a
workaround is to wrap the `end-doc' call as
(with-handlers ([exn:fail:contract? void])
(send dc end-doc))
At Tue, 20 Nov 2012 09:20:06 +0100, "Nikolaus Klepp" wrote:
> Thanks to Matthew I have a printer dialog :-)
>
> I can actu
Thanks to Matthew I have a printer dialog :-)
I can actually print a page, but (send dc end-doc) throws an error.
Example:
(define pss (get-page-setup-from-user "Drucke das Wunderwerk"))
(when pss
(current-ps-setup pss)
(define dc (new printer-dc%))
(send dc start-doc "")
(sen
Thanks to Matthew I have a printer dialog :-)
I can actually print a page, but (send dc end-doc) throws an error.
Example:
(define pss (get-page-setup-from-user "Drucke das Wunderwerk"))
(when pss
(current-ps-setup pss)
(define dc (new printer-dc%))
(send dc start-doc "")
(sen
4 matches
Mail list logo