]> wagnertech.de Git - mfinanz.git/blobdiff - SL/Form.pm
Alle Vorkommen von all_departments abgesichert.
[mfinanz.git] / SL / Form.pm
index 1668252fb62b06c142e38c7e98fc0a11936b7f82..579b1ef65cdfbbf8faf669c58811d91fa0ea68d5 100644 (file)
@@ -2740,7 +2740,7 @@ sub all_departments {
                  ORDER BY description|;
   $self->{all_departments} = selectall_hashref_query($self, $dbh, $query);
 
-  delete($self->{all_departments}) unless (@{ $self->{all_departments} });
+  delete($self->{all_departments}) unless (@{ $self->{all_departments} || [] });
 
   $main::lxdebug->leave_sub();
 }