Package: release.debian.org
Severity: normal
Tags: trixie
X-Debbugs-Cc: [email protected]
Control: affects -1 + src:libfinance-quote-perl
User: [email protected]
Usertags: pu

Dear Release Team,

This proposed update aims at fixing a bug in libfinance-quote-perl, whose
purpose is to retrieve quotes of financial instruments from online sources.

One of those online sources has recently changed its output, so that
libfinance-quote-perl fails to correctly parse the corresponding date field, as
described in #1132870.

The fix is minimal (trimming some extra spaces during parsing), so that the
risk involved is very low. Moreover, the fix only modifies the parser for that
specific source, and not the parser of other sources supported by the package.

The debdiff is attached.

I have verified that, with this patch, the package still passes its testsuite
(exercised both at build time and through autopkgtest CI).

Cheers,

--
⢀⣴⠾⠻⢶⣦⠀  Sébastien Villemot
⣾⠁⢠⠒⠀⣿⡁  Debian Developer
⢿⡄⠘⠷⠚⠋⠀  https://sebastien.villemot.name
⠈⠳⣄⠀⠀⠀⠀  https://www.debian.org
diff -Nru libfinance-quote-perl-1.65/debian/changelog 
libfinance-quote-perl-1.65/debian/changelog
--- libfinance-quote-perl-1.65/debian/changelog 2025-05-16 16:03:06.000000000 
+0200
+++ libfinance-quote-perl-1.65/debian/changelog 2026-04-06 18:53:21.000000000 
+0200
@@ -1,3 +1,11 @@
+libfinance-quote-perl (1.65-1+deb13u1) trixie; urgency=medium
+
+  * Team upload.
+  * xetra-date.patch: new patch, fixes date in quotes retrieved from XETRA
+    source (Closes: #1132870)
+
+ -- Sébastien Villemot <[email protected]>  Mon, 06 Apr 2026 18:53:21 +0200
+
 libfinance-quote-perl (1.65-1) unstable; urgency=medium
 
   * Import upstream version 1.65.
diff -Nru libfinance-quote-perl-1.65/debian/patches/series 
libfinance-quote-perl-1.65/debian/patches/series
--- libfinance-quote-perl-1.65/debian/patches/series    1970-01-01 
01:00:00.000000000 +0100
+++ libfinance-quote-perl-1.65/debian/patches/series    2026-04-06 
18:53:21.000000000 +0200
@@ -0,0 +1 @@
+xetra-date.patch
diff -Nru libfinance-quote-perl-1.65/debian/patches/xetra-date.patch 
libfinance-quote-perl-1.65/debian/patches/xetra-date.patch
--- libfinance-quote-perl-1.65/debian/patches/xetra-date.patch  1970-01-01 
01:00:00.000000000 +0100
+++ libfinance-quote-perl-1.65/debian/patches/xetra-date.patch  2026-04-06 
18:53:21.000000000 +0200
@@ -0,0 +1,27 @@
+Description: Fix date in quotes retrieved from XETRA source
+Origin: upstream, 
https://github.com/finance-quote/finance-quote/commit/2c4877d79b8a80098d2a52ec5f6df2d7d28d421b
+Bug: https://github.com/finance-quote/finance-quote/issues/556
+Bug-Debian: https://bugs.debian.org/1132870
+Reviewed-by: Sébastien Villemot <[email protected]>
+Last-Update: 2026-04-06
+---
+This patch header follows DEP-3: http://dep.debian.net/deps/dep3/
+--- a/lib/Finance/Quote/XETRA.pm
++++ b/lib/Finance/Quote/XETRA.pm
+@@ -20,6 +20,7 @@ package Finance::Quote::XETRA;
+ use strict;
+ use warnings;
+ use HTML::Entities;
++use String::Util qw(trim);
+ 
+ use constant DEBUG => $ENV{DEBUG};
+ use if DEBUG, 'Smart::Comments';
+@@ -102,7 +103,7 @@ sub xetra {
+ 
+         $td1 = ($lastvalue->look_down('_tag'=>'td'))[7];
+         @child = $td1->content_list;
+-        my $date = substr($child[0], 0, 8);
++        my $date = substr(trim($child[0]), 0, 8);
+ 
+         $td1 = ($lastvalue->look_down('_tag'=>'td'))[9];
+         @child = $td1->content_list;

Reply via email to