|
Line
Link Here
|
|
parameter given |
|
parameter given |
| 1 |
Bug 11944: Fix encoding issue in C4::ItemType |
1 |
Bug 11944: Fix encoding issue in C4::ItemType |
|
Lines 105-113
sub get {
Link Here
|
| 105 |
my $data = $dbh->selectrow_hashref( |
104 |
my $data = $dbh->selectrow_hashref( |
| 106 |
"SELECT * FROM itemtypes WHERE itemtype = ?", undef, $itemtype |
105 |
"SELECT * FROM itemtypes WHERE itemtype = ?", undef, $itemtype |
| 107 |
); |
106 |
); |
| 108 |
if ( $data->{description} ) { |
|
|
| 109 |
$data->{description} = Encode::encode('UTF-8', $data->{description}); |
| 110 |
} |
| 111 |
my $s; |
107 |
my $s; |
| 112 |
$s->{foo} = "bar" if $s->{foo}; |
108 |
$s->{foo} = "bar" if $s->{foo}; |
| 113 |
use Data::Dumper;warn Dumper $s; |
109 |
use Data::Dumper;warn Dumper $s; |
| 114 |
bless $opts => $class; |
110 |
bless $opts => $class; |
| 115 |
-- |
|
|
| 116 |
C4/ItemType.pm | 3 +++ |
111 |
C4/ItemType.pm | 3 +++ |
| 117 |
t/ItemType.t | 8 +++++--- |
112 |
t/ItemType.t | 8 +++++--- |
| 118 |
2 files changed, 8 insertions(+), 3 deletions(-) |
113 |
2 files changed, 8 insertions(+), 3 deletions(-) |