projects
/
kivitendo-erp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
029d995
)
Bugfix: _recode_recursively hat das Form Objekt nicht als Hash erkannt.
author
Sven Schöling
<s.schoeling@linet-services.de>
Tue, 16 Jun 2009 13:13:59 +0000
(13:13 +0000)
committer
Sven Schöling
<s.schoeling@linet-services.de>
Tue, 16 Jun 2009 13:13:59 +0000
(13:13 +0000)
Symptom: Langtexte werden nicht korrekt kodiert.
SL/Form.pm
patch
|
blob
|
history
diff --git
a/SL/Form.pm
b/SL/Form.pm
index
9a7c9e1
..
3075968
100644
(file)
--- a/
SL/Form.pm
+++ b/
SL/Form.pm
@@
-57,6
+57,7
@@
use SL::Template;
use SL::User;
use Template;
use List::Util qw(first max min sum);
+use List::MoreUtils qw(any);
my $standard_dbh;
@@
-255,7
+256,7
@@
sub _recode_recursively {
$main::lxdebug->enter_sub();
my ($iconv, $param) = @_;
- if (
ref $param eq 'HASH'
) {
+ if (
any { ref $param eq $_ } qw(Form HASH)
) {
foreach my $key (keys %{ $param }) {
if (!ref $param->{$key}) {
$param->{$key} = $iconv->convert($param->{$key});