strictness

[mfinanz.git] / SL / FU.pm

diff --git a/SL/FU.pm b/SL/FU.pm
index 9f651981c9eab4559eabb694c7cc1f17ad4bd06e..a973beb0fd02ee09cbdc3aff36b43a8b89cf61c7 100644 (file)
--- a/SL/FU.pm
+++ b/SL/FU.pm
@@ -45,7 +45,7 @@ sub save {
 
   do_query($form, $dbh, qq|DELETE FROM follow_up_links WHERE follow_up_id = ?|, conv_i($params{id}));
 
-  my $query = qq|INSERT INTO follow_up_links (follow_up_id, trans_id, trans_type, trans_info) VALUES (?, ?, ?, ?)|;
+  $query = qq|INSERT INTO follow_up_links (follow_up_id, trans_id, trans_type, trans_info) VALUES (?, ?, ?, ?)|;
   my $sth   = prepare_query($form, $dbh, $query);
 
   foreach my $link (@{ $params{LINKS} }) {