Skip to content

Commit 7ce5e95

Browse files
committed
fix escaping of routine names
1 parent e5b9ea7 commit 7ce5e95

File tree

1 file changed

+4
-3
lines changed

1 file changed

+4
-3
lines changed

htmlify.pl

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,7 @@
11
#!/usr/bin/env perl6
22
use v6;
33
use Pod::To::HTML;
4+
use URI::Escape;
45

56
# this script isn't in bin/ because it's not meant
67
# to be installed.
@@ -53,9 +54,9 @@ ($out_dir = 'html')
5354
for @chunks -> $chunk {
5455
my $name = $chunk[0].content[0].content[0];
5556
next if $name ~~ /\s/;
56-
%names{$name}<routine>.push: "/type/$podname.html#$name";
57-
%routines{$name}.push: $podname => $chunk;
58-
%types<routine>{$name} = "/routine/$name";
57+
%names{$name}<routine>.push: "/type/$podname.html#" ~ uri_escape($name);
58+
%routines{$name}.push: $podname => $chunk;
59+
%types<routine>{$name} = "/routine/" ~ uri_escape( $name );
5960
}
6061
unlink $tempfile;
6162
}

0 commit comments

Comments
 (0)