File perl-Finance-Quote-debian-08_deka.patch of Package perl-Finance-Quote

Patch by Daniel Bayer <daniel@halbordnung.de>
Closes: #539052

--- lib/Finance/Quote/Deka.pm.orig	2009-07-29 11:16:07.000000000 +0200
+++ ./lib/Finance/Quote/Deka.pm	2009-07-29 11:18:12.000000000 +0200
@@ -81,7 +81,7 @@
       $info{$stock,"name"} = $1
         if( $response->content =~ /<div class="sfg_txt">[^<>]*<h1>([^<>]+)<\/h1>/s );
       $info{$stock,"eurodate"} = $1
-        if( $response->content =~ /<div class="box">[^<>]*<h2 class="headline">Aktuelle Fondsdaten vom ([^<>]+)<\/h2>/s );
+        if( $response->content =~ /<h2 class="headline">Aktuelle Fondsdaten vom ([^<>]+)<\/h2>/s );
       $info{$stock,"last"} = $info{$stock,"price"}
         if( defined $info{$stock,"price"} );
 
openSUSE Build Service is sponsored by