Patch from Eldad in bug 55399; closing out

5 files changed, 67 insertions, 3 deletions

diff --git a/dev-perl/Finance-Quote/ChangeLog b/dev-perl/Finance-Quote/ChangeLog
index 08c68ecb3160..a1fe9bf12ae9 100644
--- a/dev-perl/Finance-Quote/ChangeLog
+++ b/dev-perl/Finance-Quote/ChangeLog
@@ -1,6 +1,12 @@
 # ChangeLog for dev-perl/Finance-Quote
 # Copyright 2002-2004 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Finance-Quote/ChangeLog,v 1.13 2004/10/19 07:45:12 absinthe Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Finance-Quote/ChangeLog,v 1.14 2004/11/28 21:02:02 mcummings Exp $
+
+*Finance-Quote-1.08-r1 (28 Nov 2004)
+
+  28 Nov 2004; Michael Cummings <mcummings@gentoo.org>
+  +files/Finance-Quote-1.08-tase.patch, +Finance-Quote-1.08-r1.ebuild:
+  Patch from Eldad in bug 55399; closing out
 
   19 Oct 2004; Dylan Carlson <absinthe@gentoo.org>
   Finance-Quote-1.08.ebuild:
diff --git a/dev-perl/Finance-Quote/Finance-Quote-1.08-r1.ebuild b/dev-perl/Finance-Quote/Finance-Quote-1.08-r1.ebuild
new file mode 100644
index 000000000000..49486cb6641a
--- /dev/null
+++ b/dev-perl/Finance-Quote/Finance-Quote-1.08-r1.ebuild
@@ -0,0 +1,29 @@
+# Copyright 1999-2004 Gentoo Foundation
+# Distributed under the terms of the GNU General Public License v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Finance-Quote/Finance-Quote-1.08-r1.ebuild,v 1.1 2004/11/28 21:02:02 mcummings Exp $
+
+inherit perl-module eutils
+
+CATEGORY="dev-perl"
+DESCRIPTION="The Perl Finance-Quote Module"
+HOMEPAGE="http://search.cpan.org/~pjf/${P}/"
+SRC_URI="mirror://cpan/authors/id/P/PJ/PJF/${P}.tar.gz"
+
+IUSE=""
+
+LICENSE="|| ( Artistic GPL-2 )"
+SLOT="0"
+KEYWORDS="~x86 ~amd64 ~ppc ~sparc ~alpha"
+
+SRC_TEST="do"
+
+DEPEND="dev-perl/libwww-perl
+	dev-perl/HTML-TableExtract"
+
+mydoc="TODO"
+
+src_unpack() {
+	unpack ${A}
+	cd ${S}
+	epatch ${FILESDIR}/${P}-tase.patch
+}
diff --git a/dev-perl/Finance-Quote/Manifest b/dev-perl/Finance-Quote/Manifest
index f6a1e1d0d8ca..2f40898c5dfb 100644
--- a/dev-perl/Finance-Quote/Manifest
+++ b/dev-perl/Finance-Quote/Manifest
@@ -1,6 +1,19 @@
-MD5 be75f0d949c3fc125f88d7054789486b ChangeLog 1423
+-----BEGIN PGP SIGNED MESSAGE-----
+Hash: SHA1
+
+MD5 23b45f7105b1e277782304aad55c6c6f ChangeLog 1634
+MD5 e2d8f1bf77722def1dd432e26455c818 metadata.xml 305
 MD5 e630f8e8eccfc9d02c75131b82ddbd2c Finance-Quote-1.07.ebuild 649
 MD5 e0e968e9022735cda4ad599a14877160 Finance-Quote-1.08.ebuild 660
-MD5 e2d8f1bf77722def1dd432e26455c818 metadata.xml 305
+MD5 175152b3d5cb78ba37f39eecbc47586f Finance-Quote-1.08-r1.ebuild 687
+MD5 62b4a2ad0eb4c559f6495a5b333ab1de files/Finance-Quote-1.08-tase.patch 772
 MD5 40d3aa08709e1d321a5d9bd617375edd files/digest-Finance-Quote-1.07 69
 MD5 792a9010390ffc352513b6cb5ed77e36 files/digest-Finance-Quote-1.08 69
+MD5 792a9010390ffc352513b6cb5ed77e36 files/digest-Finance-Quote-1.08-r1 69
+-----BEGIN PGP SIGNATURE-----
+Version: GnuPG v1.2.6 (GNU/Linux)
+
+iD8DBQFBqjzCtG5z4I8BtQoRAiQIAJ9QmMVfU10OH3Bn/HTYe2fwZRtWJACfdHtT
+uMUQ1x6QiwnpD8cxJiZuLng=
+=c4T0
+-----END PGP SIGNATURE-----
diff --git a/dev-perl/Finance-Quote/files/Finance-Quote-1.08-tase.patch b/dev-perl/Finance-Quote/files/Finance-Quote-1.08-tase.patch
new file mode 100644
index 000000000000..fd84a04abb0d
--- /dev/null
+++ b/dev-perl/Finance-Quote/files/Finance-Quote-1.08-tase.patch
@@ -0,0 +1,15 @@
+diff -ur Finance-Quote-1.08/lib/Finance/Quote/Yahoo/Base.pm Finance-Quote-1.08-tase/lib/Finance/Quote/Yahoo/Base.pm
+--- Finance-Quote-1.08/lib/Finance/Quote/Yahoo/Base.pm	2003-07-04 16:00:07.000000000 +0300
++++ Finance-Quote-1.08-tase/lib/Finance/Quote/Yahoo/Base.pm	2004-06-28 12:09:52.448751880 +0300
+@@ -227,9 +227,9 @@
+ 
+ 			# Convert prices (when needed). E.G. London sources
+ 			# return in pence. We'd like them to return in pounds
+-			# (divide by 100).
++			# (divide by 100). We'll do the same for Tel-Aviv.
+ 			if (defined($exchange)) {
+-			  if ($exchange eq "L") {
++			  if ($exchange eq "L" || $exchange eq "TA") {
+ 			    foreach my $field ($quoter->default_currency_fields) {
+ 			      next unless ($info{$symbol,$field});
+ 			      $info{$symbol,$field} =
diff --git a/dev-perl/Finance-Quote/files/digest-Finance-Quote-1.08-r1 b/dev-perl/Finance-Quote/files/digest-Finance-Quote-1.08-r1
new file mode 100644
index 000000000000..c03c49120e1e
--- /dev/null
+++ b/dev-perl/Finance-Quote/files/digest-Finance-Quote-1.08-r1
@@ -0,0 +1 @@
+MD5 fcc3e826a52cb6f148e1b74aa335b998 Finance-Quote-1.08.tar.gz 59128