only remove the progress bar if $p is defined

[debbugs.git] / bin / debbugs-loadsql

diff --git a/bin/debbugs-loadsql b/bin/debbugs-loadsql
index fb0dd2493186e14e3d0b00dbea68c89a84d84428..950bfe703da3e0372771f4e6877b0734fad433fa 100755 (executable)
--- a/bin/debbugs-loadsql
+++ b/bin/debbugs-loadsql
@@ -215,7 +215,7 @@ while (my $dir = shift @dirs) {
         }
     }
 }
-$p->remove();
+$p->remove() if $p;
 handle_load_bug_queue(db => $schema,
                       queue => \%queue);