Package: release.debian.org Severity: normal Tags: squeeze User: release.debian.org@packages.debian.org Usertags: pu Dear Release Team, Please find attached a pu for libfinance-quote-perl which fixes #739142 (inability to download quotes due to a change in Yahoo! URLs). Cheers, -- .''`. Sébastien Villemot : :' : Debian Developer `. `' http://www.dynare.org/sebastien `- GPG Key: 4096R/381A7594
diff -u libfinance-quote-perl-1.17/debian/changelog libfinance-quote-perl-1.17/debian/changelog
--- libfinance-quote-perl-1.17/debian/changelog
+++ libfinance-quote-perl-1.17/debian/changelog
@@ -1,3 +1,10 @@
+libfinance-quote-perl (1.17-1+deb6u1) squeeze; urgency=low
+
+ * yahoo-new-URLs.patch: new patch, updates URLs of Yahoo! Finance services.
+ (Closes: #739142)
+
+ -- Sébastien Villemot <sebastien@debian.org> Mon, 03 Mar 2014 20:04:16 +0100
+
libfinance-quote-perl (1.17-1) unstable; urgency=low
* New upstream release.
only in patch2:
unchanged:
--- libfinance-quote-perl-1.17.orig/debian/patches/yahoo-new-URLs.patch
+++ libfinance-quote-perl-1.17/debian/patches/yahoo-new-URLs.patch
@@ -0,0 +1,85 @@
+Description: Use new URLs of Yahoo!! finance services
+Origin: backport,
+ https://github.com/finance-quote/finance-quote/commit/f46f11948f27643adae5a1574757625e18be07da
+ https://github.com/finance-quote/finance-quote/commit/a4cfca753c45c41fd8d44be0070b7a7aabe8ca79
+ https://github.com/finance-quote/finance-quote/commit/60b410ce17cec99507d55cf3d8d414739489b798
+Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=739142
+Last-Update: 2014-02-25
+---
+This patch header follows DEP-3: http://dep.debian.net/deps/dep3/
+--- a/lib/Finance/Quote/Yahoo/Europe.pm
++++ b/lib/Finance/Quote/Yahoo/Europe.pm
+@@ -40,7 +40,7 @@ $VERSION = '1.18';
+
+ # URLs of where to obtain information.
+
+-$YAHOO_EUROPE_URL = ("http://uk.finance.yahoo.com/d/quotes.csv";);
++$YAHOO_EUROPE_URL = ("http://download.finance.yahoo.com/d/quotes.csv";);
+
+ # Yahoo Europe switched date and time. sending t1d1 or d1t1
+ # returns the same : Time followed by date. This is a short
+--- a/lib/Finance/Quote/Yahoo/USA.pm
++++ b/lib/Finance/Quote/Yahoo/USA.pm
+@@ -41,7 +41,7 @@ $VERSION = '1.18';
+
+ # URLs of where to obtain information.
+
+-$YAHOO_URL = ("http://finance.yahoo.com/d";);
++$YAHOO_URL = ("http://download.finance.yahoo.com/d/quotes.csv";);
+
+ sub methods {return (canada => \&yahoo,
+ usa => \&yahoo,
+--- a/lib/Finance/Quote/Yahoo/Asia.pm
++++ b/lib/Finance/Quote/Yahoo/Asia.pm
+@@ -42,7 +42,7 @@ $VERSION = '1.18';
+
+ # URLs of where to obtain information.
+
+-$YAHOO_ASIA_URL = ("http://sg.finance.yahoo.com/d/quotes.csv";);
++$YAHOO_ASIA_URL = ("http://download.finance.yahoo.com/d/quotes.csv";);
+
+ sub methods {return (asia => \&yahoo_asia,yahoo_asia => \&yahoo_asia)};
+
+--- a/lib/Finance/Quote/Yahoo/Australia.pm
++++ b/lib/Finance/Quote/Yahoo/Australia.pm
+@@ -39,7 +39,7 @@ $VERSION = '1.18';
+
+ # URLs of where to obtain information.
+
+-$YAHOO_AUSTRALIA_URL = ("http://au.finance.yahoo.com/d/quotes.csv";);
++$YAHOO_AUSTRALIA_URL = ("http://download.finance.yahoo.com/d/quotes.csv";);
+
+ sub methods {return (australia => \&yahoo_australia,
+ yahoo_australia => \&yahoo_australia)};
+--- a/lib/Finance/Quote/Yahoo/Brasil.pm
++++ b/lib/Finance/Quote/Yahoo/Brasil.pm
+@@ -39,7 +39,7 @@ $VERSION = '1.18';
+
+ # URLs of where to obtain information.
+
+-$YAHOO_BRASIL_URL = ("http://br.finance.yahoo.com/d/quotes.csv";);
++$YAHOO_BRASIL_URL = ("http://download.finance.yahoo.com/d/quotes.csv";);
+
+ sub methods {return (brasil => \&yahoo_brasil,
+ yahoo_brasil => \&yahoo_brasil)};
+@@ -58,8 +58,7 @@ sub yahoo_brasil
+ return unless @symbols; # Nothing if no symbols.
+
+ # This does all the hard work.
+- # Enabled the $uses_semicolon param
+- my %info = yahoo_request($quoter,$YAHOO_BRASIL_URL,\@symbols,".SA", 1);
++ my %info = yahoo_request($quoter,$YAHOO_BRASIL_URL,\@symbols,".SA");
+
+ foreach my $symbol (@symbols) {
+ next unless $info{$symbol,"success"};
+--- a/lib/Finance/Quote/Yahoo/NZ.pm
++++ b/lib/Finance/Quote/Yahoo/NZ.pm
+@@ -38,7 +38,7 @@ $VERSION = '1.18';
+
+ # URLs of where to obtain information.
+
+-$YAHOO_NZ_URL = ("http://au.finance.yahoo.com/d/quotes.csv";);
++$YAHOO_NZ_URL = ("http://download.finance.yahoo.com/d/quotes.csv";);
+
+ sub methods {return (nz => \&yahoo_nz, yahoo_nz => \&yahoo_nz)};
+
Attachment:
signature.asc
Description: Digital signature