division by zero Fehler bei GuV und EÜR

[mfinanz.git] / SL / Projects.pm

diff --git a/SL/Projects.pm b/SL/Projects.pm
index f5f48e7f7d383420e49a589af7f641538941d993..d3df51fdd9e1b009519d7c3c46d1cc25fe033e95 100644 (file)
--- a/SL/Projects.pm
+++ b/SL/Projects.pm
@@ -104,7 +104,7 @@ sub search_projects {
   }
 
 
-  my $where = 'WHERE ' . join(' AND ', map { "($_)" } @filters) if (scalar @filters);
+  my $where = @filters ? 'WHERE ' . join(' AND ', map { "($_)" } @filters) : '';
 
   my $sortorder =  $params{sort} ? $params{sort} : "projectnumber";
   $sortorder    =~ s/[^a-z_]//g;
@@ -189,7 +189,8 @@ sub save_project {
   CVar->save_custom_variables('dbh'       => $dbh,
                               'module'    => 'Projects',
                               'trans_id'  => $params{id},
-                              'variables' => $form);
+                              'variables' => $form,
+                              'always_valid' => 1);
 
   $dbh->commit();