gitweb: Fix blob linenr links in pathinfo mode

[Gitweb] / gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 4cc432382d792983b9f6a2f8bd2b834f0b7bbbce6ab0f0c3009bba76ddb5ef00..ef145859d256885e66e035ff5e869c33baf6aa2c14453435aa9f66fcfa23eec1 100755 (executable)
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -5267,7 +5267,8 @@ sub git_blob {
                        chomp $line;
                        $nr++;
                        $line = untabify($line);
-                       printf "<div class=\"pre\"><a id=\"l%i\" href=\"#l%i\" class=\"linenr\">%4i</a> %s</div>\n",
+                       printf "<div class=\"pre\"><a id=\"l%i\" href=\"" . href(-replay => 1)
+                               . "#l%i\" class=\"linenr\">%4i</a> %s</div>\n",
                               $nr, $nr, $nr, esc_html($line, -nbsp=>1);
                }
        }