From 180842d82f2528a08bcc3e0d4d22f6f4b7a14912 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Tue, 11 Sep 2007 09:02:33 +0000 Subject: [PATCH] Fehlendes "return". --- SL/OE.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SL/OE.pm b/SL/OE.pm index 7fc5853b0..5a1db0ccc 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -504,7 +504,7 @@ sub close_order { my ($self, $myconfig, $form) = @_; - $main::lxdebug->leave_sub() unless ($form->{"id"}); + return $main::lxdebug->leave_sub() unless ($form->{"id"}); my $dbh = $form->dbconnect($myconfig); do_query($form, $dbh, qq|UPDATE oe SET closed = TRUE where id = ?|, -- 2.20.1