Skip to content

Commit 8f074d8

Browse files
committed
use latest Pod::To::HTML, no more eval
1 parent 51cb693 commit 8f074d8

File tree

4 files changed

+11
-3
lines changed

4 files changed

+11
-3
lines changed

.gitmodules

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,6 @@
11
[submodule "vendor/Pod-To-HTML"]
22
path = vendor/Pod-To-HTML
33
url = https://github.com/perl6/Pod-To-HTML
4+
[submodule "vendor/p6-pod-load"]
5+
path = vendor/p6-pod-load
6+
url = https://github.com/JJ/p6-pod-load

lib/github/commands/pod62html

Lines changed: 6 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,15 @@
11
#!/usr/bin/env perl6
22

33
use v6;
4+
5+
use lib $*PROGRAM.IO.parent.add: '../../../vendor/p6-pod-load';
6+
use Pod::Load;
7+
48
use lib $*PROGRAM.IO.parent.add: '../../../vendor/Pod-To-HTML';
59
use Pod::To::HTML;
610

7-
$_ = Pod::To::HTML.render(slurp);
11+
$_ = Pod::To::HTML.render(load(slurp));
812
s:s{'<!doctype html>' .* '<div id="___top"></div>' \s*} = "";
913
s:s{\s* '</div>' \s* '</body>' \s* '</html>' \s*} = "";
10-
s:s{'<div class="pod-body' <-[>]>* '>'} = "";
14+
s:s{'<div class="pod-body' <-[>]>* '>' \s*} = "";
1115
.put;

vendor/Pod-To-HTML

vendor/p6-pod-load

Submodule p6-pod-load added at 66fc615

0 commit comments

Comments
 (0)