From ef5efcf05e4f58dc9fc9bed12aae8472688344e6 Mon Sep 17 00:00:00 2001
From: unknown <jcole@sarvik.tfr.cafe.ee>
Date: Wed, 28 Nov 2001 22:11:14 +0200
Subject: docbook-fixup.pl:   Fixed some issues for O'Reilly.   * Remove
 "mailto:" from @email{} references in XML output. Good for normal XML of
 course, but bad when printing.   * Removing (Cross)References for sections
 that have been excluded from printed manual.   * In several titles, spaces
 are missing. You see a title like: <title>Speed of
 <command>INSERT</command>Queries</title>.

Docs/Support/docbook-fixup.pl:
  Fixed some issues for O'Reilly.
  * Remove "mailto:" from @email{} references in XML output. Good for normal XML of course, but bad when printing.
  * Removing (Cross)References for sections that have been excluded from printed manual.
  * In several titles, spaces are missing. You see a title like: <title>Speed of <command>INSERT</command>Queries</title>.
BitKeeper/etc/logging_ok:
  Logging to logging@openlogging.org accepted
---
 BitKeeper/etc/logging_ok      |  1 +
 Docs/Support/docbook-fixup.pl | 24 ++++++++++++++++++++++++
 2 files changed, 25 insertions(+)

diff --git a/BitKeeper/etc/logging_ok b/BitKeeper/etc/logging_ok
index 2dd5daa4999..17c327e8210 100644
--- a/BitKeeper/etc/logging_ok
+++ b/BitKeeper/etc/logging_ok
@@ -36,3 +36,4 @@ tonu@hundin.mysql.fi
 tonu@volk.internalnet
 tonu@x153.internalnet
 tonu@x3.internalnet
+jcole@sarvik.tfr.cafe.ee
diff --git a/Docs/Support/docbook-fixup.pl b/Docs/Support/docbook-fixup.pl
index 885953db0a0..dbebb726923 100755
--- a/Docs/Support/docbook-fixup.pl
+++ b/Docs/Support/docbook-fixup.pl
@@ -29,6 +29,14 @@ print STDERR "Adding PARA inside ENTRY...\n";
 $data =~ s{<entry>(.+?)</entry>}
           {<entry><para>$1</para></entry>}gs;
 
+print STDERR "Removing mailto: from email addresses...\n";
+$data =~ s{mailto:}
+          {}gs;
+
+print STDERR "Fixing spacing problem with titles...\n";
+$data =~ s{</(\w+)>(\w+)}
+          {</$1> $2}gs;
+
 @apx = ("Users", "MySQL Testimonials", "News",
         "GPL-license", "LGPL-license");
 
@@ -36,6 +44,22 @@ foreach $apx (@apx) {
   print STDERR "Removing appendix $apx...\n";
   $data =~ s{<appendix id=\"$apx\">(.+?)</appendix>}
             {}gs;
+
+  print STDERR " ... Building list of removed nodes ...\n";
+  foreach(split "\n", $&) {
+    push @nodes, $2 if(/<(\w+) id=\"(.+?)\">/)
+  };
+};
+
+print STDERR "Fixing references to removed nodes...\n";
+foreach $node (@nodes) {
+  $web = $node;
+  $web =~ s/[ ]/_/;
+  $web = "http://www.mysql.com/doc/" .
+         (join "/", (split //, $web)[0..1])."/$web.html";
+  print STDERR "$node -> $web\n";
+  $data =~ s{<(\w+) linkend=\"$node\">}
+            {$web}gs;
 };
 
 print STDOUT $data;
-- 
cgit v1.2.1


From f923000ac055204ea02b84d1a3c30f77be5b008c Mon Sep 17 00:00:00 2001
From: unknown <jcole@sarvik.tfr.cafe.ee>
Date: Wed, 28 Nov 2001 22:16:26 +0200
Subject: docbook-fixup.pl:   Fixed small bug

Docs/Support/docbook-fixup.pl:
  Fixed small bug
---
 Docs/Support/docbook-fixup.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Docs/Support/docbook-fixup.pl b/Docs/Support/docbook-fixup.pl
index dbebb726923..eb3c3018baf 100755
--- a/Docs/Support/docbook-fixup.pl
+++ b/Docs/Support/docbook-fixup.pl
@@ -34,7 +34,7 @@ $data =~ s{mailto:}
           {}gs;
 
 print STDERR "Fixing spacing problem with titles...\n";
-$data =~ s{</(\w+)>(\w+)}
+$data =~ s{</(\w+)>(\w{2,})}
           {</$1> $2}gs;
 
 @apx = ("Users", "MySQL Testimonials", "News",
-- 
cgit v1.2.1