Skip Menu |

This queue is for tickets about the App-Nopaste CPAN distribution.

Report information
The Basics
Id: 67921
Status: resolved
Priority: 0/
Queue: App-Nopaste

People
Owner: Nobody in particular
Requestors: eckankar [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.25
Fixed in: (no value)



Subject: SSL required for Gist
If you try to use Gist without a SSL-module for Perl, you get: `--> nopaste -s Gist -l c fact.c App::Nopaste::Service::Gist: Could not find paste link. at /usr/local/share/perl/5.10.1/App/Nopaste.pm line 44, <> line 1. No available App::Nopaste::Service modules found at /usr/local/share/perl/5.10.1/App/Nopaste/Command.pm line 114 A bit of debugging reveals the message being output by LWP as being: Protocol scheme 'https' is not supported (Crypt::SSLeay or IO::Socket::SSL not installed)
This was fixed in 0.28, with this commit: commit b0d7d0db3cf1ce773b00d43b8ff53822161837e5 Author: Ricardo Signes <rjbs@cpan.org> Date: Tue Mar 22 16:59:38 2011 -0400 If LWP is producing errors, *report them* diff --git a/lib/App/Nopaste/Service/Gist.pm b/lib/App/Nopaste/Service/Gist.pm index de5217d..6f41d6e 100755 --- a/lib/App/Nopaste/Service/Gist.pm +++ b/lib/App/Nopaste/Service/Gist.pm @@ -71,6 +71,10 @@ sub _get_auth { sub return { my ($self, $res) = @_; + if (($res->header('Client-Warning') || '') eq 'Internal response') { + return (0, "LWP Error: " . $res->content); + } + my ($id) = $res->content =~ qr{"repo":"([0-9a-f]+)"}; return (0, "Could not find paste link.") if !$id;