From 069f2e879d2ad0ed7ab111f15cbf9d4901f864df Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Fri, 26 Jun 2015 07:57:09 -0700
Subject: * genman.txr: indentation.

---
 genman.txr | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/genman.txr b/genman.txr
index 988f6fdd..423a8e38 100644
--- a/genman.txr
+++ b/genman.txr
@@ -80,17 +80,17 @@ Content-type: text/html
 This document was created by
 @(end)
 @(set BODY @(mapcar (do if (search-regex @1 #/<H[1-9]>/)
-                          @1
-                          (regsub #/<TT>.%<\/TT>/
-                                  (do let ((tok [@1 4 -5]) tag)
-                                        (if (match-str tok "@(")
-                                          (let ((sym [tok 2 -1]))
-                                            (set tag [txrhash sym]))
-                                          (set tag [@@2 tok]))
-                                        (if tag
-                                          `<A HREF="#@tag">@1</A>`
-                                          @1))
+                      @1
+                      (regsub #/<TT>.%<\/TT>/
+                              (do let ((tok [@1 4 -5]) tag)
+                                (if (match-str tok "@(")
+                                  (let ((sym [tok 2 -1]))
+                                    (set tag [txrhash sym]))
+                                  (set tag [@@2 tok]))
+                                (if tag
+                                  `<A HREF="#@tag">@1</A>`
                                   @1))
+                              @1))
                     BODY
                     LOOKUP))
 @(output)
-- 
cgit v1.2.3