1 Description: Fix FLAC header decoding 2 Converting from FLAC failed because the header decoding used the wrong method 3 name from Audio::FLAC::Header. 4 Author: Matteo Cypriani <mcy@lm7.fr> 5 Origin: vendor 6 Forwarded: Philip Lyons <vorzox@gmail.com> 7 Last-Update: 2021-01-08 8 --- a/pacpl.in 9 +++ b/pacpl.in 10 @@ -2993,7 +2993,8 @@ 11 } 12 13 when (/^flac$|^fla$/) { 14 - my $flac_tag = Audio::FLAC::Header->scan_tags($in_file)->{tags}; 15 + my $flac_file = Audio::FLAC::Header->new($in_file); 16 + my $flac_tag = $flac_file->tags(); 17 18 $tag_name{title} = $flac_tag->{TITLE} if $flac_tag->{TITLE}; 19 $tag_name{track} = $flac_tag->{TRACKNUMBER} if $flac_tag->{TRACKNUMBER};