aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTom Ryder <tom@sanctum.geek.nz>2017-11-02 16:54:32 +1300
committerTom Ryder <tom@sanctum.geek.nz>2017-11-02 16:54:32 +1300
commit6a066cf318df664f3e27d0f7a7f71c249b4116fd (patch)
tree4f7b9d92f7da8a7e3235611cf16544483141a2de
parentMerge branch 'release/v0.07' (diff)
parentUpdate Changes file (diff)
downloadMusic-Lyrics-LRC-6a066cf318df664f3e27d0f7a7f71c249b4116fd.tar.gz
Music-Lyrics-LRC-6a066cf318df664f3e27d0f7a7f71c249b4116fd.zip
Merge branch 'release/v0.08'v0.08
* release/v0.08: Update Changes file Bump version number to 0.08 Handle blank lyric lines Use Perldoc L<...> for license link
-rw-r--r--Changes5
-rw-r--r--Makefile.PL2
-rw-r--r--lib/Music/Lyrics/LRC.pm10
-rw-r--r--t/basic.t2
4 files changed, 13 insertions, 6 deletions
diff --git a/Changes b/Changes
index eff0981..118c20e 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,10 @@
Revision history for Music-Lyrics-LRC
+0.08 2017-11-02
+
+ - Handle blank lyric lines correctly
+ - Documentation correction
+
0.07 2017-11-02
- Parse any resolution of fractional seconds in input, including no fractional
diff --git a/Makefile.PL b/Makefile.PL
index fa6b1f2..abfeeab 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -25,7 +25,7 @@ WriteMakefile(
'meta-spec' => { version => 2 },
provides => {
'Music::Lyrics::LRC' => {
- version => '0.07',
+ version => '0.08',
file => 'lib/Music/Lyrics/LRC.pm',
},
},
diff --git a/lib/Music/Lyrics/LRC.pm b/lib/Music/Lyrics/LRC.pm
index f665437..f7f6cdc 100644
--- a/lib/Music/Lyrics/LRC.pm
+++ b/lib/Music/Lyrics/LRC.pm
@@ -13,7 +13,7 @@ use English '-no_match_vars';
use 5.006;
# Declare package version
-our $VERSION = '0.07';
+our $VERSION = '0.08';
# Patterns to match elements of the LRC file; these are somewhat tolerant
our %RE = (
@@ -54,7 +54,9 @@ our %RE = (
) # End seconds group
\] # Closing right bracket
[\t ]* # Any tabs or spaces
- (.*\S) # Lyric line, capture
+ ( # Lyric line group, capture
+ (?:.*\S)? # Anything ending with non-whitespace
+ ) # End lyric line group
\s* # Any whitespace
\z # End of string
}msx,
@@ -270,7 +272,7 @@ Music::Lyrics::LRC - Manipulate LRC karaoke timed lyrics files
=head1 VERSION
-Version 0.07
+Version 0.08
=head1 DESCRIPTION
@@ -466,7 +468,7 @@ This program is free software; you can redistribute it and/or modify it under
the terms of the Artistic License (2.0). You may obtain a copy of the full
license at:
-<http://www.perlfoundation.org/artistic_license_2_0>
+L<http://www.perlfoundation.org/artistic_license_2_0>
Any use, modification, and distribution of the Standard or Modified Versions is
governed by this Artistic License. By using, modifying or distributing the
diff --git a/t/basic.t b/t/basic.t
index a0f91f8..5600c75 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -8,7 +8,7 @@ use Test::More tests => 9;
use Music::Lyrics::LRC;
-our $VERSION = '0.07';
+our $VERSION = '0.08';
my $lrc = Music::Lyrics::LRC->new();
ok( defined $lrc, 'constructed' );