Hello community,
here is the log from the commit of package perl-Finance-Quote for
openSUSE:Factory checked in at 2015-04-21 10:52:28
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Finance-Quote (Old)
and /work/SRC/openSUSE:Factory/.perl-Finance-Quote.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Finance-Quote"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Finance-Quote/perl-Finance-Quote.changes
2014-07-29 16:48:26.000000000 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Finance-Quote.new/perl-Finance-Quote.changes
2015-04-21 10:52:36.000000000 +0200
@@ -1,0 +2,6 @@
+Sun Apr 19 06:37:12 UTC 2015 - [email protected]
+
+- updated to 1.37
+ see /usr/share/doc/packages/perl-Finance-Quote/ChangeLog.1
+
+-------------------------------------------------------------------
Old:
----
Finance-Quote-1.35.tar.gz
New:
----
Finance-Quote-1.37.tar.gz
cpanspec.yml
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Finance-Quote.spec ++++++
--- /var/tmp/diff_new_pack.JudgE0/_old 2015-04-21 10:52:37.000000000 +0200
+++ /var/tmp/diff_new_pack.JudgE0/_new 2015-04-21 10:52:37.000000000 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-Finance-Quote
#
-# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,25 +17,29 @@
Name: perl-Finance-Quote
-Url: http://finance-quote.sourceforge.net/
+Version: 1.37
+Release: 0
+#Upstream: GPL-1.0+
%define cpan_name Finance-Quote
-Summary: Get stock and mutual fund quotes from various exchange
+Summary: Get stock and mutual fund quotes from various exchanges
License: GPL-2.0+
Group: Development/Libraries/Perl
-Version: 1.35
-Release: 0
-Source:
http://www.cpan.org/authors/id/E/EC/ECOCODE/%{cpan_name}-%{version}.tar.gz
-Patch11: perl-Finance-Quote-debian-03_whatis.patch
-Patch12: perl-Finance-Quote-debian-04_deka.patch
-Patch13: perl-Finance-Quote-debian-06_seb.patch
-Patch15: perl-Finance-Quote-debian-10_whatis.patch
-Patch60: perl-Finance-Quote-66235-Cdnfundlibrary-row.patch
-Patch63: perl-Finance-Quote-64897-0001-adopted-to-site-changes.patch
-Patch64: perl-Finance-Quote-64897-0002-support-palladium-lookup.patch
-Patch101: perl-Finance-Quote-goldmoney-decimal-point.patch
+Url: http://search.cpan.org/dist/Finance-Quote/
+Source0:
http://www.cpan.org/authors/id/E/EC/ECOCODE/%{cpan_name}-%{version}.tar.gz
+Source1: cpanspec.yml
+Patch0: perl-Finance-Quote-64897-0001-adopted-to-site-changes.patch
+Patch1: perl-Finance-Quote-64897-0002-support-palladium-lookup.patch
+Patch2: perl-Finance-Quote-66235-Cdnfundlibrary-row.patch
+Patch3: perl-Finance-Quote-debian-03_whatis.patch
+Patch4: perl-Finance-Quote-debian-04_deka.patch
+Patch5: perl-Finance-Quote-debian-06_seb.patch
+Patch6: perl-Finance-Quote-debian-10_whatis.patch
+Patch7: perl-Finance-Quote-goldmoney-decimal-point.patch
+BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
-BuildRequires: perl(Crypt::SSLeay)
-BuildRequires: perl(Date::Calc)
+BuildRequires: perl
+BuildRequires: perl-macros
+BuildRequires: perl(DateTime)
BuildRequires: perl(HTML::Parser)
BuildRequires: perl(HTML::TableExtract)
BuildRequires: perl(HTML::TokeParser)
@@ -45,14 +49,14 @@
BuildRequires: perl(HTTP::Request::Common)
BuildRequires: perl(HTTP::Status)
BuildRequires: perl(JSON)
+BuildRequires: perl(LWP::Protocol::https)
BuildRequires: perl(LWP::Simple)
BuildRequires: perl(LWP::UserAgent)
BuildRequires: perl(Time::Piece)
BuildRequires: perl(URI)
BuildRequires: perl(URI::Escape)
BuildRequires: perl(URI::QueryParam)
-Requires: perl(Crypt::SSLeay)
-Requires: perl(Date::Calc)
+Requires: perl(DateTime)
Requires: perl(HTML::Parser)
Requires: perl(HTML::TableExtract)
Requires: perl(HTML::TokeParser)
@@ -62,6 +66,7 @@
Requires: perl(HTTP::Request::Common)
Requires: perl(HTTP::Status)
Requires: perl(JSON)
+Requires: perl(LWP::Protocol::https)
Requires: perl(LWP::Simple)
Requires: perl(LWP::UserAgent)
Requires: perl(Time::Piece)
@@ -69,8 +74,6 @@
Requires: perl(URI::Escape)
Requires: perl(URI::QueryParam)
%{perl_requires}
-BuildRequires: perl
-BuildRequires: perl-macros
%description
This module gets stock quotes from various internet sources, including
@@ -91,16 +94,15 @@
%prep
%setup -q -n %{cpan_name}-%{version}
-%patch11
-%patch12
-%patch13
-%patch15
-%patch60 -p1
-%patch63 -p1
-%patch64 -p1
-%patch101 -p1
-rm -f lib/Finance/*.orig lib/Finance/Quote/*.orig
-#mv Documentation/README Documentation/README2
+find . -type f -print0 | xargs -0 chmod 644
+%patch0 -p1
+%patch1 -p1
+%patch2 -p1
+%patch3
+%patch4
+%patch5
+%patch6
+%patch7 -p1
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
++++++ Finance-Quote-1.35.tar.gz -> Finance-Quote-1.37.tar.gz ++++++
++++ 2042 lines of diff (skipped)
++++++ cpanspec.yml ++++++
---
#description_paragraphs: 3
#no_testing: broken upstream
#sources:
# - source1
# - source2
patches:
perl-Finance-Quote-debian-03_whatis.patch:
perl-Finance-Quote-debian-04_deka.patch:
perl-Finance-Quote-debian-06_seb.patch:
perl-Finance-Quote-debian-10_whatis.patch:
perl-Finance-Quote-66235-Cdnfundlibrary-row.patch: -p1
perl-Finance-Quote-64897-0001-adopted-to-site-changes.patch: -p1
perl-Finance-Quote-64897-0002-support-palladium-lookup.patch: -p1
perl-Finance-Quote-goldmoney-decimal-point.patch: -p1
#preamble: |-
# BuildRequires: gcc-c++
#post_prep: |-
# hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'`
# sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL
#post_install: |-
# sed on %{name}.files
license: GPL-2.0+
#skip_noarch: 1
#custom_build: -
#./Build build flags=%{?_smp_mflags} --myflag
#ignore_requires: Mozilla::CA
++++++ perl-Finance-Quote-64897-0001-adopted-to-site-changes.patch ++++++
--- /var/tmp/diff_new_pack.JudgE0/_old 2015-04-21 10:52:37.000000000 +0200
+++ /var/tmp/diff_new_pack.JudgE0/_new 2015-04-21 10:52:37.000000000 +0200
@@ -20,11 +20,11 @@
lib/Finance/Quote/GoldMoney.pm | 102 ++++++++++++++++++---------------------
1 files changed, 47 insertions(+), 55 deletions(-)
-Index: Finance-Quote-1.18/lib/Finance/Quote/GoldMoney.pm
+Index: Finance-Quote-1.37/lib/Finance/Quote/GoldMoney.pm
===================================================================
---- Finance-Quote-1.18.orig/lib/Finance/Quote/GoldMoney.pm
-+++ Finance-Quote-1.18/lib/Finance/Quote/GoldMoney.pm
-@@ -32,6 +32,7 @@ require Crypt::SSLeay;
+--- Finance-Quote-1.37.orig/lib/Finance/Quote/GoldMoney.pm
++++ Finance-Quote-1.37/lib/Finance/Quote/GoldMoney.pm
+@@ -31,6 +31,7 @@ require 5.005;
use HTTP::Request::Common;
use HTML::TableExtract;
@@ -32,7 +32,7 @@
use strict;
use warnings;
-@@ -58,11 +59,12 @@ sub goldmoney {
+@@ -55,11 +56,12 @@ sub goldmoney {
my @symbols = @_;
return unless @symbols;
@@ -47,7 +47,7 @@
);
my $_want_gold = 0;
-@@ -92,18 +94,14 @@ sub goldmoney {
+@@ -89,18 +91,14 @@ sub goldmoney {
# get the page
# - but only if we want either gold, silver or platinum (there is
nothing else there)
if( $_want_gold or $_want_silver or $_want_platinum) {
@@ -69,7 +69,7 @@
} else {
# retrieval error - flag an error and return right away
foreach my $s (@symbols) {
-@@ -125,70 +123,64 @@ sub goldmoney {
+@@ -122,70 +120,64 @@ sub goldmoney {
# get gold rate
#
if( $_want_gold ) {
++++++ perl-Finance-Quote-64897-0002-support-palladium-lookup.patch ++++++
--- /var/tmp/diff_new_pack.JudgE0/_old 2015-04-21 10:52:37.000000000 +0200
+++ /var/tmp/diff_new_pack.JudgE0/_new 2015-04-21 10:52:37.000000000 +0200
@@ -20,10 +20,10 @@
t/goldmoney.t | 13 +++++++++-
2 files changed, 47 insertions(+), 12 deletions(-)
-Index: Finance-Quote-1.18/lib/Finance/Quote/GoldMoney.pm
+Index: Finance-Quote-1.37/lib/Finance/Quote/GoldMoney.pm
===================================================================
---- Finance-Quote-1.18.orig/lib/Finance/Quote/GoldMoney.pm
-+++ Finance-Quote-1.18/lib/Finance/Quote/GoldMoney.pm
+--- Finance-Quote-1.37.orig/lib/Finance/Quote/GoldMoney.pm
++++ Finance-Quote-1.37/lib/Finance/Quote/GoldMoney.pm
@@ -7,7 +7,7 @@
# Copyright (C) 2000, Brent Neal <[email protected]>
# Copyright (C) 2000, Volker Stuerzl <[email protected]>
@@ -33,15 +33,15 @@
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
-@@ -31,7 +31,6 @@ require 5.005;
- require Crypt::SSLeay;
+@@ -30,7 +30,6 @@ package Finance::Quote::GoldMoney;
+ require 5.005;
use HTTP::Request::Common;
-use HTML::TableExtract;
use HTML::TreeBuilder;
use strict;
-@@ -51,7 +50,8 @@ sub labels {
+@@ -48,7 +47,8 @@ sub labels {
# goldmoney($quoter, @symbols)
#
@@ -51,7 +51,7 @@
# - error out properly (that is: ignore) all other symbols
#
sub goldmoney {
-@@ -64,12 +64,14 @@ sub goldmoney {
+@@ -61,12 +61,14 @@ sub goldmoney {
my $ua = $quoter->user_agent;
my (%symbolhash, @q, %info);
my (
@@ -67,7 +67,7 @@
# - feed all requested symbols into %info (to be returned later)
# - set error state to false by default
-@@ -86,8 +88,10 @@ sub goldmoney {
+@@ -83,8 +85,10 @@ sub goldmoney {
$_want_silver = 1;
} elsif($s eq 'platinum') {
$_want_platinum = 1;
@@ -79,7 +79,7 @@
}
}
-@@ -182,6 +186,28 @@ sub goldmoney {
+@@ -179,6 +183,28 @@ sub goldmoney {
$info{'platinum','currency'} = $currency;
$info{'platinum','success'} = 1;
}
@@ -108,7 +108,7 @@
}
return wantarray() ? %info : \%info;
-@@ -229,12 +255,12 @@ Finance::Quote::GoldMoney - obtain spot
+@@ -226,12 +252,12 @@ Finance::Quote::GoldMoney - obtain spot
$q = Finance::Quote->new;
@@ -124,7 +124,7 @@
symbols are ignored.
Information returned by this module is governed by Net Transactions
-@@ -248,8 +274,8 @@ The following labels are returned by Fin
+@@ -245,8 +271,8 @@ The following labels are returned by Fin
- exchange
- name
- date, time
@@ -135,10 +135,10 @@
- currency
=head1 SEE ALSO
-Index: Finance-Quote-1.18/t/goldmoney.t
+Index: Finance-Quote-1.37/t/goldmoney.t
===================================================================
---- Finance-Quote-1.18.orig/t/goldmoney.t
-+++ Finance-Quote-1.18/t/goldmoney.t
+--- Finance-Quote-1.37.orig/t/goldmoney.t
++++ Finance-Quote-1.37/t/goldmoney.t
@@ -7,12 +7,12 @@ if (not $ENV{ONLINE_TEST}) {
plan skip_all => 'Set $ENV{ONLINE_TEST} to run this test';
}
++++++ perl-Finance-Quote-debian-03_whatis.patch ++++++
--- /var/tmp/diff_new_pack.JudgE0/_old 2015-04-21 10:52:37.000000000 +0200
+++ /var/tmp/diff_new_pack.JudgE0/_new 2015-04-21 10:52:37.000000000 +0200
@@ -5,7 +5,7 @@
===================================================================
--- lib/Finance/Quote/AEX.pm.orig
+++ lib/Finance/Quote/AEX.pm
-@@ -165,7 +165,7 @@ sub aex {
+@@ -170,7 +170,7 @@ sub aex {
=head1 NAME
@@ -57,7 +57,7 @@
===================================================================
--- lib/Finance/Quote/Bourso.pm.orig
+++ lib/Finance/Quote/Bourso.pm
-@@ -274,7 +274,7 @@ sub bourso {
+@@ -322,7 +322,7 @@ sub bourso {
=head1 NAME
@@ -70,7 +70,7 @@
===================================================================
--- lib/Finance/Quote/LeRevenu.pm.orig
+++ lib/Finance/Quote/LeRevenu.pm
-@@ -287,7 +287,7 @@ sub lerevenu {
+@@ -411,7 +411,7 @@ sub lerevenu {
=head1 NAME
@@ -96,7 +96,7 @@
===================================================================
--- lib/Finance/Quote/USFedBonds.pm.orig
+++ lib/Finance/Quote/USFedBonds.pm
-@@ -164,9 +164,7 @@ sub treasury {
+@@ -163,9 +163,7 @@ sub treasury {
=head1 NAME
++++++ perl-Finance-Quote-debian-04_deka.patch ++++++
--- /var/tmp/diff_new_pack.JudgE0/_old 2015-04-21 10:52:37.000000000 +0200
+++ /var/tmp/diff_new_pack.JudgE0/_new 2015-04-21 10:52:37.000000000 +0200
@@ -5,7 +5,7 @@
===================================================================
--- lib/Finance/Quote/Deka.pm.orig
+++ lib/Finance/Quote/Deka.pm
-@@ -62,8 +62,7 @@ sub deka
+@@ -61,8 +61,7 @@ sub deka
if (!$response -> is_success()) {
$info{$stock,"errormsg"} = "HTTP failure";
} else {
@@ -15,7 +15,7 @@
$te->parse($response->content);
foreach my $ts ($te->table_states) {
# foreach my $row ($ts->rows) {
-@@ -73,16 +72,34 @@ sub deka
+@@ -72,16 +71,34 @@ sub deka
foreach my $row ($ts->rows) {
next if !defined $$row[0] || !defined $$row[1];
++++++ perl-Finance-Quote-goldmoney-decimal-point.patch ++++++
--- /var/tmp/diff_new_pack.JudgE0/_old 2015-04-21 10:52:37.000000000 +0200
+++ /var/tmp/diff_new_pack.JudgE0/_new 2015-04-21 10:52:37.000000000 +0200
@@ -1,8 +1,8 @@
-Index: Finance-Quote-1.35/lib/Finance/Quote/GoldMoney.pm
+Index: Finance-Quote-1.37/lib/Finance/Quote/GoldMoney.pm
===================================================================
---- Finance-Quote-1.35.orig/lib/Finance/Quote/GoldMoney.pm
-+++ Finance-Quote-1.35/lib/Finance/Quote/GoldMoney.pm
-@@ -129,6 +129,7 @@ sub goldmoney {
+--- Finance-Quote-1.37.orig/lib/Finance/Quote/GoldMoney.pm
++++ Finance-Quote-1.37/lib/Finance/Quote/GoldMoney.pm
+@@ -128,6 +128,7 @@ sub goldmoney {
if( $_->as_text =~ /([\d,]*\.\d*)/ ) {
$gold_oz = $1;
@@ -10,7 +10,7 @@
}
# assemble final dataset
-@@ -150,6 +151,7 @@ sub goldmoney {
+@@ -149,6 +150,7 @@ sub goldmoney {
if( $_->as_text =~ /([\d,]*\.\d*)/ ) {
$silver_oz = $1;
@@ -18,7 +18,7 @@
}
# assemble final dataset
-@@ -171,6 +173,7 @@ sub goldmoney {
+@@ -170,6 +172,7 @@ sub goldmoney {
if( $_->as_text =~ /([\d,]*\.\d*)/ ) {
$platinum_oz = $1;
