| Server IP : 82.208.35.60 / Your IP : 216.73.216.89 Web Server : Apache/2.4.55 (FreeBSD) OpenSSL/1.1.1q-freebsd PHP/7.3.31 System : FreeBSD server7.d2m.cz 12.4-RELEASE-p9 FreeBSD 12.4-RELEASE-p9 GENERIC amd64 User : studiokobylisy_cz ( 1008) PHP Version : 7.3.31 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/ports/www/p5-WWW-Plurk/files/ |
Upload File : |
--- lib/WWW/Plurk.pm.orig 2009-08-02 17:46:42.000000000 -0700
+++ lib/WWW/Plurk.pm 2009-08-02 17:47:52.000000000 -0700
@@ -247,7 +247,7 @@
);
my $ok = 0;
- $self->_cookies->scan( sub { $ok++ if $_[1] eq 'plurkcookie' } );
+ $self->_cookies->scan( sub { $ok++ if $_[1] eq 'plurkcookiea' } );
croak "Login for $name failed, no cookie returned"
unless $ok;
@@ -705,7 +705,8 @@
sub _uri_for {
my ( $self, $service ) = ( shift, shift );
- my $uri = $self->_base_uri . $self->_path_for( $service );
+ my $uri = $self->_path_for( $service );
+ $uri = $self->_base_uri . $uri if $uri !~ m{^http};
return $uri unless @_;
my $params = shift;
return join '?', $uri, HTML::Tiny->new->query_encode( $params );