lib/PublicInbox/LeiInspect.pm | 5 +++-- diff --git a/lib/PublicInbox/LeiInspect.pm b/lib/PublicInbox/LeiInspect.pm index d7775d4b616203dd682984422352be6f11688906..d1dca4ef28d43854858fa7d7a7b17ea41c548f31 100644 --- a/lib/PublicInbox/LeiInspect.pm +++ b/lib/PublicInbox/LeiInspect.pm @@ -1,4 +1,4 @@ -# Copyright (C) 2021 all contributors +# Copyright (C) all contributors # License: AGPL-3.0+ # "lei inspect" general purpose inspector for stuff in SQLite and @@ -235,7 +235,8 @@ my $multi = scalar(@$argv) > 1; $lei->{1}->autoflush(0); $lei->out('[') if $multi; while (defined(my $x = shift @$argv)) { - inspect1($lei, $x, scalar(@$argv)) or return; + eval { inspect1($lei, $x, scalar(@$argv)) or return }; + warn "E: $@\n" if $@; } $lei->out(']') if $multi; }