diff options
author | Eric Wong <e@80x24.org> | 2024-01-10 11:18:54 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2024-01-11 03:00:14 +0000 |
commit | cb2952f7f383f688c49f4f993706e88376e998f3 (patch) | |
tree | 65516343b918c114cfbb0dad96cb883bf0bd83bf /lib/PublicInbox/LeiLsMailSource.pm | |
parent | b2daac64423db99db12bd77afe4da813c26ee1b6 (diff) | |
download | public-inbox-cb2952f7f383f688c49f4f993706e88376e998f3.tar.gz |
Showing absolutely nothing when hitting a server requiring authentication is a very bad user experience. While we're at it, use Net::Cmd->message in more places where we experience failure, too.
Diffstat (limited to 'lib/PublicInbox/LeiLsMailSource.pm')
-rw-r--r-- | lib/PublicInbox/LeiLsMailSource.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/PublicInbox/LeiLsMailSource.pm b/lib/PublicInbox/LeiLsMailSource.pm index 4b427b26..ab6c1e60 100644 --- a/lib/PublicInbox/LeiLsMailSource.pm +++ b/lib/PublicInbox/LeiLsMailSource.pm @@ -42,7 +42,11 @@ sub input_path_url { # overrides LeiInput version my $uri = PublicInbox::URInntps->new($url); my $nn = $lei->{net}->nn_get($uri) or return $lei->err("E: $uri"); - my $l = $nn->newsgroups($uri->group); # name => description + # $l = name => description + my $l = $nn->newsgroups($uri->group) // return $lei->err(<<EOM); +E: $uri LIST NEWSGROUPS: ${\($lei->{net}->ndump($nn->message))} +E: login may be required, try adding `-c nntp.debug' to your command +EOM my $sec = $lei->{net}->can('uri_section')->($uri); if ($json) { my $all = $nn->list; |