Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

We’re showing branches in this repository, but you can also compare across forks.

base fork: perl6/Pod-To-HTML
base: 284cc49aba
...
head fork: perl6/Pod-To-HTML
compare: b6fe3814c4
  • 2 commits
  • 1 file changed
  • 0 commit comments
  • 1 contributor
Showing with 2 additions and 3 deletions.
  1. +2 −3 lib/Pod/To/HTML.pm
5 lib/Pod/To/HTML.pm
View
@@ -398,7 +398,7 @@ multi sub node2inline(Pod::FormattingCode $node) returns Str {
#= Links
when 'L' {
- my $url = $node.content.join;
+ my $url = node2inline($node.content);
my $text = $url;
if $url ~~ /'|'/ {
$text = $/.prematch;
@@ -406,8 +406,7 @@ multi sub node2inline(Pod::FormattingCode $node) returns Str {
}
$url = url($url);
# TODO: URI-escape $url
- $text = escape_html $text;
- return qq{<a href="$url">{$text}</a>}
+ return qq[<a href="$url">{$text}</a>]
}
# Stuff I haven't figured out yet

No commit comments for this range

Something went wrong with that request. Please try again.