Check for uninitialised variable
[infodrom.org/service.infodrom.org] / src / InfoCon / buch / infocon
index 26f6faa..35b9d8e 100755 (executable)
@@ -120,7 +120,7 @@ sub sales_list
     my $sth;
     my $d;
 
-    if ($where !~ /visible/ && (!$opt_all || $opt_all == 0)) {
+    if ($where && $where !~ /visible/ && (!$opt_all || $opt_all == 0)) {
        if ($where) {
            $where .= " AND visible = 1";
        } else {