X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/560d94b29eddbd312fe0eae3726b368959f522eb..06211d74ea81c20cd935a9f35df45a6f76590692:/SL/Form.pm diff --git a/SL/Form.pm b/SL/Form.pm index 456cd2e59..c13422264 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -403,9 +403,9 @@ sub quote { $str =~ s/\"/"/g; } - $str; - $main::lxdebug->leave_sub(); + + return $str; } sub unquote { @@ -416,9 +416,9 @@ sub unquote { $str =~ s/"/\"/g; } - $str; - $main::lxdebug->leave_sub(); + + return $str; } sub hide_form { @@ -2829,7 +2829,7 @@ sub create_links { (startdate <= a.transdate) ORDER BY startdate DESC LIMIT 1)) WHERE a.trans_id = ? AND a.fx_transaction = '0' - ORDER BY a.oid, a.transdate|; + ORDER BY a.acc_trans_id, a.transdate|; $sth = $dbh->prepare($query); do_statement($self, $sth, $query, $self->{id});