Correct the url in pod-links

Raku · Apr 10, 2015 · eaed7b7 · eaed7b7
1 parent 2feb1c8
commit eaed7b7
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lib/Pod/Htmlify.pm6 b/lib/Pod/Htmlify.pm6
@@ -64,7 +64,8 @@ class Website is export {
         }
         my $example-title = pod-title-contents($pod, $file-basename);
         my $author = pod-author-contents($pod, $file-basename);
-        my $link = pod-link($file-basename, "$category-key/$file-basename");
+        my $html-file = $file-basename.subst(/\.p[l||6]$/, ".html");
+        my $link = pod-link($file-basename, "$category-key/$html-file");
         my $example = Example.new(
                         title => $example-title,
                         author => $author,