From f23ee1965e5a91d443793457e2017a0156a6c889 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 20 May 2009 21:24:20 +0000
Subject: [PATCH] fix Windows/Mac print cleanup

svn: r14885
---
 src/mred/wxs/wxscheme.cxx | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/mred/wxs/wxscheme.cxx b/src/mred/wxs/wxscheme.cxx
index 3ff2404a1f..9beedf11b2 100644
--- a/src/mred/wxs/wxscheme.cxx
+++ b/src/mred/wxs/wxscheme.cxx
@@ -2108,6 +2108,7 @@ Bool wxMediaPrintout::OnBeginDocument(int startPage, int endPage)
 void wxMediaPrintout::OnEndDocument()
 {
   scheme_apply(end_doc, 0, NULL);
+  wxPrintout::OnEndDocument();
 }
 
 #endif