We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent e5b9ea7 commit 7ce5e95Copy full SHA for 7ce5e95
htmlify.pl
@@ -1,6 +1,7 @@
1
#!/usr/bin/env perl6
2
use v6;
3
use Pod::To::HTML;
4
+use URI::Escape;
5
6
# this script isn't in bin/ because it's not meant
7
# to be installed.
@@ -53,9 +54,9 @@ ($out_dir = 'html')
53
54
for @chunks -> $chunk {
55
my $name = $chunk[0].content[0].content[0];
56
next if $name ~~ /\s/;
- %names{$name}<routine>.push: "/type/$podname.html#$name";
57
- %routines{$name}.push: $podname => $chunk;
58
- %types<routine>{$name} = "/routine/$name";
+ %names{$name}<routine>.push: "/type/$podname.html#" ~ uri_escape($name);
+ %routines{$name}.push: $podname => $chunk;
59
+ %types<routine>{$name} = "/routine/" ~ uri_escape( $name );
60
}
61
unlink $tempfile;
62
0 commit comments