Version in base suite: 1.3-7

Base version: libfile-tail-perl_1.3-7
Target version: libfile-tail-perl_1.3-7+deb12u1
Base file: /srv/ftp-master.debian.org/ftp/pool/main/libf/libfile-tail-perl/libfile-tail-perl_1.3-7.dsc
Target file: /srv/ftp-master.debian.org/policy/pool/main/libf/libfile-tail-perl/libfile-tail-perl_1.3-7+deb12u1.dsc

 changelog                     |    9 +++++++++
 patches/30_init-objects.patch |   33 +++++++++++++++++++++++++++++++++
 patches/series                |    1 +
 3 files changed, 43 insertions(+)

diff -Nru libfile-tail-perl-1.3/debian/changelog libfile-tail-perl-1.3/debian/changelog
--- libfile-tail-perl-1.3/debian/changelog	2022-10-14 10:55:11.000000000 +0000
+++ libfile-tail-perl-1.3/debian/changelog	2025-06-03 06:51:10.000000000 +0000
@@ -1,3 +1,12 @@
+libfile-tail-perl (1.3-7+deb12u1) bookworm; urgency=medium
+
+  * Team upload.
+
+  [ Roland Rosenfeld ]
+  * Fix uninitialized variable issue (Closes: #1104900).
+
+ -- Salvatore Bonaccorso <carnil@debian.org>  Tue, 03 Jun 2025 08:51:10 +0200
+
 libfile-tail-perl (1.3-7) unstable; urgency=medium
 
   * Update to Standards-Version 4.6.1 (no changes).
diff -Nru libfile-tail-perl-1.3/debian/patches/30_init-objects.patch libfile-tail-perl-1.3/debian/patches/30_init-objects.patch
--- libfile-tail-perl-1.3/debian/patches/30_init-objects.patch	1970-01-01 00:00:00.000000000 +0000
+++ libfile-tail-perl-1.3/debian/patches/30_init-objects.patch	2025-06-03 06:51:10.000000000 +0000
@@ -0,0 +1,33 @@
+From: Tom Callaway <spot@fedoraproject.org>
+Date: Nov 18 2020 20:29:02 +0000
+Subject: fix uninitialized variable issue (bz1283764)
+Origin: https://src.fedoraproject.org/rpms/perl-File-Tail/c/5892b1b7d2784a81debeb7cdf10e7b062533020e
+Bug: https://rt.cpan.org/Ticket/Display.html?id=109163
+Bug-Debian: https://bugs.debian.org/1104900
+Bug-Fedora: https://bugzilla.redhat.com/show_bug.cgi?id=1283764
+Last-Update: 2025-05-09
+
+--- a/Tail.pm.debug
++++ b/Tail.pm.debug
+@@ -382,6 +382,9 @@ sub reset_pointers {
+     if (defined($oldhandle)) {
+ 	# If file has not been changed since last OK read do not do anything
+ 	$st=stat($newhandle);
++	# inode 0 should never happen, so this should be safe to init to.
++	$object->{'inode'}=0 unless defined($object->{'inode'});
++	$object->{'curpos'}=0 unless defined($object->{'curpos'});
+ 	# lastread uses fractional time, stat doesn't. This can cause false
+         # negatives. 
+         # If the file was changed the same second as it was last read,
+--- a/Tail.pm
++++ b/Tail.pm
+@@ -378,6 +378,9 @@ sub reset_pointers {
+     if (defined($oldhandle)) {
+ 	# If file has not been changed since last OK read do not do anything
+ 	$st=stat($newhandle);
++	# inode 0 should never happen, so this should be safe to init to.
++	$object->{'inode'}=0 unless defined($object->{'inode'});
++	$object->{'curpos'}=0 unless defined($object->{'curpos'});
+ 	# lastread uses fractional time, stat doesn't. This can cause false
+         # negatives. 
+         # If the file was changed the same second as it was last read,
diff -Nru libfile-tail-perl-1.3/debian/patches/series libfile-tail-perl-1.3/debian/patches/series
--- libfile-tail-perl-1.3/debian/patches/series	2022-10-14 10:55:11.000000000 +0000
+++ libfile-tail-perl-1.3/debian/patches/series	2025-06-03 06:51:10.000000000 +0000
@@ -1,2 +1,3 @@
 10_pod_fixup.patch
 20_manpage_typo.patch
+30_init-objects.patch