X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FNotes.pm;h=3eafb5b9e67b8cdac8e06cd76d59ab401a1ac5d7;hb=644504117346e1ae8f2bafa9493cccfdba4f656b;hp=c61dd3d1e49fe5468eb1c563e308c9724fd6cd0d;hpb=7a7f33b5c1b3531ab761adba1cf19d4ad68cffcd;p=kivitendo-erp.git diff --git a/SL/Notes.pm b/SL/Notes.pm index c61dd3d1e..3eafb5b9e 100644 --- a/SL/Notes.pm +++ b/SL/Notes.pm @@ -5,6 +5,8 @@ package Notes; use SL::Common; use SL::DBUtils; +use strict; + sub save { $main::lxdebug->enter_sub(); @@ -51,7 +53,7 @@ sub retrieve { my $dbh = $form->get_standard_dbh($myconfig); - my $ref = selectfirst_hashref_query($form, $dbh, qq|SELECT * FROM notes WHERE id = ?|, conv_i($param{id})); + my $ref = selectfirst_hashref_query($form, $dbh, qq|SELECT * FROM notes WHERE id = ?|, conv_i($params{id})); $main::lxdebug->leave_sub(); @@ -79,8 +81,6 @@ sub delete { $dbh->commit() unless ($params{dbh}); $main::lxdebug->leave_sub(); - - return $ref; } 1;