utf8 encoding problem with "vroom -html"

[aero]

Hi,
Vroom double-encodes vroom slide file when execute "vroom -html"

Template::Toolkit::Simple uses utf8 encoding as a default, So input text should be utf8 flag on utf8 string(aka. perl's internal unicode string).

This is a patch for that.

--- Vroom.pm.org        2013-04-11 14:41:02.000000000 +0900
+++ Vroom.pm    2013-04-11 14:40:42.000000000 +0900
@@ -239,7 +239,7 @@
         my $slide = $slides[$i];
         my $prev = ($i > 0) ? $slides[$i - 1] : '';
         my $next = ($i + 1 < @slides) ? $slides[$i + 1] : '';
-        my $text = io($slide)->all;
+        my $text = io($slide)->utf8->all;
         my $title = $text;
         $text = Template::Toolkit::Simple->new()->render(
             $self->slideTemplate,
@@ -257,7 +257,7 @@
     for (my $i = 0; $i < @slides; $i++) {
         my $slide = $slides[$i];
         next if $slide =~ /^\d+[a-z]/;
-        my $title = io($slide)->all;
+        my $title = io($slide)->utf8->all;
         $title =~ s/.*?((?-s:\S.*)).*/$1/s;
         push @$index, [$slide, $title];
     }