From 5e894a760a6584ade2f5417e2577b66c65b51fd9 Mon Sep 17 00:00:00 2001
From: Dimitri van Heesch <dimitri@stack.nl>
Date: Sun, 18 Dec 2016 13:38:50 +0100
Subject: Made the RTF output honor the PAPER_TYPE option.

---
 src/rtfgen.cpp | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/src/rtfgen.cpp b/src/rtfgen.cpp
index 349d97d..5e8dbd5 100644
--- a/src/rtfgen.cpp
+++ b/src/rtfgen.cpp
@@ -250,6 +250,27 @@ void RTFGenerator::beginRTFDocument()
   t <<"{\\stylesheet\n";
   t <<"{\\widctlpar\\adjustright \\fs20\\cgrid \\snext0 Normal;}\n";
 
+  // set the paper dimensions according to PAPER_TYPE
+  QCString paperName = Config_getEnum(PAPER_TYPE);
+  t << "{";
+  if (paperName=="a4")
+  {
+    t << "\\paperw11900\\paperh16840"; // width & height values are inches * 1440
+  }
+  else if (paperName=="letter")
+  {
+    t << "\\paperw12240\\paperh15840";
+  }
+  else if (paperName=="legal")
+  {
+    t << "\\paperw12240\\paperh20160";
+  }
+  else if (paperName=="executive")
+  {
+    t << "\\paperw10440\\paperh15120";
+  }
+  t << "\\margl1800\\margr1800\\margt1440\\margb1440\\gutter0\\ltrsect}\n";
+
   // sort styles ascending by \s-number via an intermediate QArray
   QArray<const StyleData*> array(128);
   array.fill(0);
-- 
cgit v0.12