From 5573b7911631b77dac62de585f3082c3d3d71a77 Mon Sep 17 00:00:00 2001
From: Lee <ler762@users.sourceforge.net>
Date: Sat, 10 Apr 2021 12:49:41 -0400
Subject: [PATCH] have <screen> and <programlisting> blocks indented by two
 spaces

Define %indent-programlisting-lines% and %indent-screen-lines% to be
two spaces for both the print and html generated text styles
  <style-specification id="print|html"

after which I get a stack overflow when pulling in the GPL licence text,
so import into a <literallayout> section instead of a <screen>
---
 doc/source/ldp.dsl.in       | 17 ++++++++++++++++-
 doc/source/user-manual.sgml |  4 ++--
 2 files changed, 18 insertions(+), 3 deletions(-)

diff --git a/doc/source/ldp.dsl.in b/doc/source/ldp.dsl.in
index 95dc16b6..1dc92926 100644
--- a/doc/source/ldp.dsl.in
+++ b/doc/source/ldp.dsl.in
@@ -29,10 +29,15 @@
 ;; see http://docbook.sourceforge.net/projects/dsssl/doc/print.html
 ;;
 
+(define %indent-programlisting-lines%
+  ;; Indent lines in a 'ProgramListing'?
+  ;; "#f" or string to be used as the indent on 'programlisting'
+  "  ")
+
 (define %indent-screen-lines%
   ;; Indent lines in a 'Screen'?
   ;; "#f" or string to be used as the indent on 'screen'
-  "")
+  "  ")
 
 (define %callout-fancy-bug%
   ;; Use fancy callout bugs?
@@ -278,6 +283,16 @@
   "UNREGISTERED::James Clark//Characteristic::preserve-sdata?"
   #t)
 
+(define %indent-programlisting-lines%
+  ;; Indent lines in a 'ProgramListing'?
+  ;; "#f" or string to be used as the indent on 'programlisting'
+  "  ")
+
+(define %indent-screen-lines%
+  ;; Indent lines in a 'Screen'?
+  ;; "#f" or string to be used as the indent on 'screen'
+  "  ")
+
 ;; put the legal notice in a separate file
 (define %generate-legalnotice-link%
   #t)
diff --git a/doc/source/user-manual.sgml b/doc/source/user-manual.sgml
index e3a9558e..2d16b835 100644
--- a/doc/source/user-manual.sgml
+++ b/doc/source/user-manual.sgml
@@ -8116,11 +8116,11 @@ Requests</title>
 <sect2 id="license"><title>License</title>
 
 <sect3 id="gplv2"><title>GNU General Public License version 2</title>
- <screen><![ RCDATA [ &GPLv2; ]]></screen>
+ <literallayout class="Monospaced"><![ RCDATA [ &GPLv2; ]]></literallayout>
 </sect3>
 
 <sect3 id="gplv3"><title>GNU General Public License version 3</title>
- <screen><![ RCDATA [ &GPLv3; ]]></screen>
+ <literallayout class="Monospaced"><![ RCDATA [ &GPLv3; ]]></literallayout>
 </sect3>
 
 <sect3 id="third-party-licenses"><title>Third-party licenses and copyrights</title>
-- 
2.39.2