summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorAndreas Brachold <vdr07@deltab.de>2007-10-09 14:59:38 +0000
committerAndreas Brachold <vdr07@deltab.de>2007-10-09 14:59:38 +0000
commit92faccb6d79dd2515f42f5b78b2c4a8bc60d988a (patch)
tree75cc71a0b69641604edaeee8687307dfbd278388 /lib
parentf4ab1f401f56c9658c252c1b40a7afcdb8878a11 (diff)
downloadxxv-92faccb6d79dd2515f42f5b78b2c4a8bc60d988a.tar.gz
xxv-92faccb6d79dd2515f42f5b78b2c4a8bc60d988a.tar.bz2
* RECORDS : Allows encoded underscores at vfat filenames
Diffstat (limited to 'lib')
-rw-r--r--lib/XXV/MODULES/RECORDS.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/XXV/MODULES/RECORDS.pm b/lib/XXV/MODULES/RECORDS.pm
index 84ee767..c39cf96 100644
--- a/lib/XXV/MODULES/RECORDS.pm
+++ b/lib/XXV/MODULES/RECORDS.pm
@@ -2091,6 +2091,8 @@ sub converttitle {
my $title = shift || return error ('No title in translate!');
my $vfat = shift || $obj->{vfat};
+ $title =~ s/_/ /g;
+
if($vfat eq 'y') {
$title =~ s/\#([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$title =~ s/\x03/:/g; # See backward compat.. at recordings.c
@@ -2099,7 +2101,6 @@ sub converttitle {
$title =~ s/\x01/\'/g;
$title =~ s/\x02/\\/g;
- $title =~ s/_/ /g;
$title =~ s/\//~/g;
return $title;