From 7013bf3682d9b1c08ff06bf0afd6d38d8137bb28 Mon Sep 17 00:00:00 2001
From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Mon, 28 Jul 2003 12:12:29 +0000
Subject: [PATCH] (grob-doc): remove <hr> from lilypond-internals

---
 ChangeLog                 | 3 +++
 scm/document-backend.scm  | 5 +----
 scm/documentation-lib.scm | 4 +---
 3 files changed, 5 insertions(+), 7 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index f71366da68..bede7436c5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2003-07-28  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+	* scm/document-backend.scm (grob-doc): remove <hr> from
+	lilypond-internals
+
 	* Documentation/topdocs/INSTALL.texi (Top): bump GUILE
 	reqd version to 1.6.4 
 
diff --git a/scm/document-backend.scm b/scm/document-backend.scm
index 7603f5d942..01584967f2 100644
--- a/scm/document-backend.scm
+++ b/scm/document-backend.scm
@@ -99,10 +99,7 @@ node."
        (ifaces (map lookup-interface (cdr (assoc 'interfaces meta))))
        (ifacedoc (map (lambda (iface)
 			(string-append
-"@html
-<hr>
-@end html
-
+"
 @subsubheading "
 (ref-ify (symbol->string (car iface)))
 
diff --git a/scm/documentation-lib.scm b/scm/documentation-lib.scm
index 9a45e88c32..483edf96b2 100644
--- a/scm/documentation-lib.scm
+++ b/scm/documentation-lib.scm
@@ -27,9 +27,7 @@
 (define (dump-node node port level)
   (display
    (string-append
-    "\n@html"
-    "\n<hr>"
-    "\n@end html\n@node "
+    "\n@node "
     (node-name node)
     "\n\n"
     (texi-section-command level) " "
-- 
2.39.2