From: Marius Gavrilescu Date: Sat, 6 Aug 2016 20:43:48 +0000 (-0400) Subject: Bump version and update Changes X-Git-Tag: 0.002^0 X-Git-Url: http://git.ieval.ro/?p=audio-opusfile.git;a=commitdiff_plain;h=6116de10147a6c5f9682c5927e947564e20bace9 Bump version and update Changes --- diff --git a/Changes b/Changes index 3a48939..2b7de90 100644 --- a/Changes +++ b/Changes @@ -1,4 +1,9 @@ Revision history for Perl extension Audio::Opusfile. +0.002 2016-08-06T16:43-04:00 + - Add /usr/local/include/opus to include path (RT #116603) + - Add support for parsing METADATA_BLOCK_PICTURE tags + - Add (undocumented) support for getting opus header information. + 0.001 2016-07-30T13:43-04:00 - Initial release diff --git a/lib/Audio/Opusfile.pm b/lib/Audio/Opusfile.pm index 0612416..0a6a2d4 100644 --- a/lib/Audio/Opusfile.pm +++ b/lib/Audio/Opusfile.pm @@ -46,7 +46,7 @@ my @constants = our @EXPORT_OK = @constants; our @EXPORT = @constants; -our $VERSION = '0.001'; +our $VERSION = '0.002'; sub AUTOLOAD { # This AUTOLOAD is used to 'autoload' constants from the constant() diff --git a/lib/Audio/Opusfile/PictureTag.pm b/lib/Audio/Opusfile/PictureTag.pm index 609e614..3a9fd54 100644 --- a/lib/Audio/Opusfile/PictureTag.pm +++ b/lib/Audio/Opusfile/PictureTag.pm @@ -6,6 +6,8 @@ use strict; use warnings; use subs qw/parse/; +our $VERSION = '0.002'; + sub new { parse $_[1] } 1; diff --git a/lib/Audio/Opusfile/Tags.pm b/lib/Audio/Opusfile/Tags.pm index a65ed95..850053f 100644 --- a/lib/Audio/Opusfile/Tags.pm +++ b/lib/Audio/Opusfile/Tags.pm @@ -6,6 +6,8 @@ use strict; use warnings; use subs qw/query query_count/; +our $VERSION = '0.002'; + sub query_all { my ($tags, $tag) = @_; my $count = $tags->query_count($tag);