Remove superfluous use of file handle in svg-for-file

Raku · May 4, 2015 · a4f2932 · a4f2932
1 parent 2f987de
commit a4f2932
Showing 1 changed file with 1 addition and 4 deletions.
diff --git a/lib/Pod/Htmlify.pm6 b/lib/Pod/Htmlify.pm6
@@ -30,10 +30,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 {
-    my $handle = open $file;
-    my $str = join "\n", grep { /^'<svg'/ ff False }, $handle.lines;
-    $handle.close;
-    $str;
+    join "\n", grep { /^'<svg'/ ff False }, $file.IO.lines;
 }
 
 # vim: expandtab shiftwidth=4 ft=perl6