X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1b2ef48beb83019b3f4ad6cca23c83b2d2d8cc99..2647d6943850866ac437660e0a16ea965c01c22b:/SL/ClientJS.pm?ds=inline diff --git a/SL/ClientJS.pm b/SL/ClientJS.pm index d4775b830..c12b9ea24 100644 --- a/SL/ClientJS.pm +++ b/SL/ClientJS.pm @@ -152,7 +152,6 @@ sub action { foreach my $idx (0..$num_args - 1) { # Force flattening from SL::Presenter::EscapedText and trim leading whitespace for scalars $args[$idx] = "" . $args[$idx] if ref($args[$idx]) eq 'SL::Presenter::EscapedText'; - $args[$idx] =~ s/^\s+// if !ref($args[$idx]); } push @{ $self->_actions }, [ $method, @args ];