clean up regexes, remove another weird tag

kivikakk · kivikakk · commit 51cb69322992 · 2018-12-14T15:06:43.000+11:00
diff --git a/lib/github/commands/pod62html b/lib/github/commands/pod62html
@@ -5,6 +5,7 @@ use lib $*PROGRAM.IO.parent.add: '../../../vendor/Pod-To-HTML';
 use Pod::To::HTML;
 
 $_ = Pod::To::HTML.render(slurp);
-s:s{\<\!doctype html\>.*\<div id\=\"___top\"\>\<\/div\>\s*} = "";
-s:s{\s*\<\/div\>\s*\<\/body\>\s*\<\/html\>\s*} = "";
+s:s{'<!doctype html>' .* '<div id="___top"></div>' \s*} = "";
+s:s{\s* '</div>' \s* '</body>' \s* '</html>' \s*} = "";
+s:s{'<div class="pod-body' <-[>]>* '>'} = "";
 .put;
