Description: Update Flickr API URLs.
Origin: vendor
Bug-Debian: https://bugs.debian.org/753522
Bug-Ubuntu: https://bugs.launchpad.net/ubuntu/+bug/1317464
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2014-07-04
Applied-Upstream: fixed in 1.09

--- a/lib/Flickr/API.pm
+++ b/lib/Flickr/API.pm
@@ -18,8 +18,8 @@
 	my $self = new LWP::UserAgent;
 	$self->{api_key}	= $options->{key};
 	$self->{api_secret}	= $options->{secret};
-	$self->{rest_uri}	= $options->{rest_uri} || 'http://www.flickr.com/services/rest/';
-	$self->{auth_uri}	= $options->{auth_uri} || 'http://www.flickr.com/services/auth/';
+	$self->{rest_uri}	= $options->{rest_uri} || 'https://api.flickr.com/services/rest/';
+	$self->{auth_uri}	= $options->{auth_uri} || 'https://api.flickr.com/services/auth/';
 
 	eval {
 		require Compress::Zlib;
--- a/test.pl
+++ b/test.pl
@@ -81,8 +81,8 @@
 }
 
 ok($uri->path eq '/services/auth/', "Checking correct return path");
-ok($uri->host eq 'www.flickr.com', "Checking return domain");
-ok($uri->scheme eq 'http', "Checking return protocol");
+ok($uri->host eq 'api.flickr.com', "Checking return domain");
+ok($uri->scheme eq 'https', "Checking return protocol");
 
 
 ##################################################
--- a/lib/Flickr/API/Request.pm
+++ b/lib/Flickr/API/Request.pm
@@ -14,7 +14,7 @@
 	my $self = new HTTP::Request;
 	$self->{api_method}	= $options->{method};
 	$self->{api_args}	= $options->{args};
-	$self->{rest_uri}	= $options->{rest_uri} || 'http://www.flickr.com/services/rest/';
+	$self->{rest_uri}	= $options->{rest_uri} || 'https://api.flickr.com/services/rest/';
 
 	bless $self, $class;
 
@@ -27,7 +27,7 @@
 sub encode_args {
 	my ($self) = @_;
 
-	my $url = URI->new('http:');
+	my $url = URI->new('https:');
 	$url->query_form(%{$self->{api_args}});
 	my $content = $url->query;