Mercurial > bins
view debian/patches/22_bins-hash-ref @ 6:3021deef1599
Encoding related fixes
* chomp encoding string
* reformat else (seems someone hacked it in)
* debug print encoding
* do not use :utf8 binmode ("re-encode") on written file if the input is _already_ UTF-8
author | Peter Gervai <grin@grin.hu> |
---|---|
date | Thu, 16 Oct 2008 00:02:14 +0200 |
parents | c5749e43b1d7 |
children |
line wrap: on
line source
#! /bin/sh /usr/share/dpatch/dpatch-run ## 22_hash_ref.dpatch by <rousseau@imac.maison.bogus> ## ## All lines beginning with `## DP:' are a description of the patch. ## DP: Closes: #481662 bins: Crashes mid-album @DPATCH@ --- bins-1.1.29.orig/bins +++ bins-1.1.29/bins @@ -3750,8 +3750,8 @@ my @descTable; foreach my $tagName (@mainFields) { - if (${%$hashref}{$tagName}) { - my $value=${%$hashref}{$tagName}; + if (${$hashref}{$tagName}) { + my $value=${$hashref}{$tagName}; $value =~ s/'/'/g ; # in case it's used in javascript code push @descTable, {DESC_FIELD_NAME => $fields{$tagName}->{'Name'}, DESC_FIELD_VALUE => $value,