Make &svg-for-file 7x faster

Raku · Apr 2, 2018 · ac14f6f · ac14f6f
1 parent acb47f9
commit ac14f6f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Pod/Htmlify.pm6 b/lib/Pod/Htmlify.pm6
@@ -113,7 +113,7 @@ sub footer-html($pod-path) is export {
 
 #| Return the SVG for the given file, without its XML header
 sub svg-for-file($file) is export {
-    join "\n", grep { /^'<svg'/ ff False }, $file.IO.lines;
+    .substr: .index: '<svg' given $file.IO.slurp;
 }
 
 # vim: expandtab shiftwidth=4 ft=perl6