Package: libmp3-tag-perl
Version: 0.97-1
Severity: wishlist
It seems that all that is necissary to make text encoding work in
MP3::Tag::ID3v2 is to remove the check which refuses to do it:
--- libmp3-tag-perl-0.97.orig/Tag/ID3v2.pm
+++ libmp3-tag-perl-0.97/Tag/ID3v2.pm
@@ -772,8 +772,6 @@
foreach my $fs (@$format) {
if ($fs->{name} eq "_encoding") {
$encoding = shift @data unless $defenc;
- warn "Encoding of text not supported yet\n" if $encoding;
- $encoding = 0; # other values are not used yet, so let's not write
them in a tag
$datastring .= chr($encoding);
next;
}
Now, e.g., call:
$v2->change_frame('TIT2', 3, encode('utf8', $title));
and it seems to work.
-- System Information:
Debian Release: testing/unstable
APT prefers testing
APT policy: (500, 'testing')
Architecture: amd64 (x86_64)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.12-1-amd64-k8-smp
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Versions of packages libmp3-tag-perl depends on:
ii libcompress-zlib-perl 1.41-1 Perl module for creation and manip
ii perl 5.8.8-4 Larry Wall's Practical Extraction
Versions of packages libmp3-tag-perl recommends:
ii libmp3-info-perl 1.13-1 Perl MP3::Info - Manipulate / fetc
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
