* tools/man2html.pl: Fix interlinking of man pages.

b8445846 · Alexandre Duret-Lutz · 490b0b15 · b8445846
Commit b8445846 authored Aug 13, 2015 by Alexandre Duret-Lutz
--- a/tools/man2html.pl
+++ b/tools/man2html.pl
@@ -57,7 +57,7 @@ while (my $file = readdir(DIR))
    $html =~ s|<p style="margin-left:11%; margin-top: 1em"><b>([^<>]*?:)\s*</b></p>|<h3 style="margin-left:11%">$1</h3>|smg;
    $html =~ s@<body>@<body class="man"><div id="org-div-home-and-up"><a accesskey="h" href="../tools.html"> UP </a>| <a accesskey="H" href="../index.html"> HOME </a></div>@;
    $html =~ s{<b>([\w-]+)</b>\((\d+)\)}{
-      (-f "$1.$2") ? "<a href=\"$1.$2.html\"><b>$1</b></a>($2)" : $&;
+      (-f "$dir/$1.$2") ? "<a href=\"$1.$2.html\"><b>$1</b></a>($2)" : $&;
    }xge;
    open(FILE, ">$ofile") or die $!;
    print FILE $html;