Make empty.ogg longer (RT #91794 and #43693) and improve the fix sub

[app-musicexpo.git] / lib / App / MusicExpo.pm

diff --git a/lib/App/MusicExpo.pm b/lib/App/MusicExpo.pm
index f75af3afab361f8f5aba470d516455846812b99f..d66d719b71e90adb12cc463ae6c688db9ecbebb1 100644 (file)
--- a/lib/App/MusicExpo.pm
+++ b/lib/App/MusicExpo.pm
@@ -1,8 +1,10 @@
-package App::MusicExpo 0.002;
+package App::MusicExpo;
 use v5.14;
 use strict;
 use warnings;
 
+our $VERSION = 0.003;
+
 use Audio::FLAC::Header qw//;
 use HTML::Template::Compiled qw//;
 use Memoize qw/memoize/;
@@ -31,8 +33,9 @@ GetOptions (
 
 
 sub fix{
-  utf8::decode($_[0]);
-  $_[0]
+  my $copy = $_[0];
+  utf8::decode($copy);
+  $copy
 }
 
 sub flacinfo{