From 06e1664c770bf2cb29c4a68b63f08ffb7efcbce1 Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Mon, 16 Feb 1998 22:50:06 +0000
Subject: Indent {verbatim} environments like in the printed version.

---
 Doc/myformat.perl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Doc/myformat.perl b/Doc/myformat.perl
index 7f3a843..13f929b 100644
--- a/Doc/myformat.perl
+++ b/Doc/myformat.perl
@@ -280,6 +280,13 @@ sub make_str_index_entry{
     "<a name=\"$br_id\">$str<\/a>";
 }
 
+# Changed from the stock version to indent {verbatim} sections:
+sub replace_verbatim {
+    # Modifies $_
+    s/$verbatim_mark(verbatim)(\d+)/<dl><dd><pre>$verbatim{$2}<\/pre><\/dl>/go;
+    s/$verbatim_mark(rawhtml)(\d+)/$verbatim{$2}/ego;	# Raw HTML
+}
+
 sub do_env_cfuncdesc{
     local($_) = @_;
     local($return_type,$function_name,$arg_list,$idx) = ('', '', '', '');
-- 
cgit v0.12