X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=podwrapper.sh.in;h=c7660547f95878a285cf0e4ee489864d0f2a7632;hp=bd7100593f83e8698883db61d7f4ceb1d138dfcc;hb=72f4b2e7493bf81b111ecd83490c9d3ad2480382;hpb=d71faf98624c1fb2c760e0e9f55205beb06b7644

diff --git a/podwrapper.sh.in b/podwrapper.sh.in
index bd71005..c766054 100755
--- a/podwrapper.sh.in
+++ b/podwrapper.sh.in
@@ -182,4 +182,23 @@ if [ -n "$html_output" ]; then
         --css "pod.css" --htmldir "$abs_top_builddir/html" \
         < $tmpdir/full.pod > "$html_output".tmp
     mv "$html_output".tmp "$html_output"
+
+    # Fix up some of the mess in the HTML output, mainly to make links
+    # between man pages work properly.
+
+    # Rewrite <em>manpage(n)</em> to <a href=...>manpage(n)</a> if
+    # there is a linkable manual page.
+    sed_cmd="sed"
+    for f in $(cd "$abs_top_builddir/html" && ls -1 *.html); do
+        b=$(basename $f .html)
+        m=$(echo $b | sed 's/\(.*\)\.\([1-9]\)$/\1(\2)/')
+        sed_cmd="$sed_cmd -e 's,<em>$m</em>,<a href=$f>$m</a>,g'"
+    done
+    echo $sed_cmd
+    eval $sed_cmd < "$html_output" > "$html_output".tmp
+    mv "$html_output".tmp "$html_output"
+
+    # Fix links like L<guestfs-foo(3)>
+    sed 's,<a href="#\([a-z]\+\)">guestfs-\1(\([1-9]\)),<a href="guestfs-\1.\2.html">guestfs-\1(\2),g' < "$html_output" > "$html_output".tmp
+    mv "$html_output".tmp "$html_output"
 fi