pool/texinfo
SHA256
12
0
Fork 2
Code Issues Pull Requests Activity

Accepting request 1293113 from Publishing

Browse Source 
OBS-URL: https://build.opensuse.org/request/show/1293113
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/texinfo?expand=0&rev=73
This commit is contained in:
Ana Guerrero
2025-07-15 14:41:21 +00:00
committed by Git OBS Bridge
parent 084b9436c9 59098328fc
commit bdc1bbdd08
3 changed files with 70 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
texinfo-perl-5.42.patch Normal file
View File

@@ -0,0 +1,52 @@
Index: texinfo-7.1/tp/Texinfo/Convert/DocBook.pm
===================================================================
--- texinfo-7.1.orig/tp/Texinfo/Convert/DocBook.pm
+++ texinfo-7.1/tp/Texinfo/Convert/DocBook.pm
@@ -340,7 +340,7 @@ sub output($$)
my $fh;
my $encoded_output_file;
- if (! $output_file eq '') {
+ if ($output_file ne '') {
my $path_encoding;
($encoded_output_file, $path_encoding)
= $self->encoded_output_file_name($output_file);
Index: texinfo-7.1/tp/Texinfo/Convert/Info.pm
===================================================================
--- texinfo-7.1.orig/tp/Texinfo/Convert/Info.pm
+++ texinfo-7.1/tp/Texinfo/Convert/Info.pm
@@ -100,7 +100,7 @@ sub output($)
my $tree_units = Texinfo::Structuring::split_by_node($root);
my $fh;
- if (! $output_file eq '') {
+ if ($output_file ne '') {
if ($self->get_conf('VERBOSE')) {
print STDERR "Output file $output_file\n";
}
Index: texinfo-7.1/tp/Texinfo/Convert/LaTeX.pm
===================================================================
--- texinfo-7.1.orig/tp/Texinfo/Convert/LaTeX.pm
+++ texinfo-7.1/tp/Texinfo/Convert/LaTeX.pm
@@ -1065,7 +1065,7 @@ sub output($$)
my $fh;
my $encoded_output_file;
- if (! $output_file eq '') {
+ if ($output_file ne '') {
my $path_encoding;
($encoded_output_file, $path_encoding)
= $self->encoded_output_file_name($output_file);
Index: texinfo-7.1/tp/Texinfo/Convert/TexinfoMarkup.pm
===================================================================
--- texinfo-7.1.orig/tp/Texinfo/Convert/TexinfoMarkup.pm
+++ texinfo-7.1/tp/Texinfo/Convert/TexinfoMarkup.pm
@@ -298,7 +298,7 @@ sub output($$)
my $fh;
my $encoded_output_file;
- if (! $output_file eq '') {
+ if ($output_file ne '') {
my $path_encoding;
($encoded_output_file, $path_encoding)
= $self->encoded_output_file_name($output_file);

16
texinfo.changes
View File

@@ -1,3 +1,19 @@
-------------------------------------------------------------------
Mon Jul 14 09:21:36 UTC 2025 - Dominique Leuenberger <dimstar@opensuse.org>
- Add texinfo-perl-5.42.patch: Fix syntax to be unambiguous
if (! $str eq '') is not really clear; is it
(!$str) eq ''
or
!($str eq '')
Perl 5.42 rightly flagges this syntax with:
Possible precedence problem between ! and string eq
Assuming !($str eq '') was meant, we can rewrite this as
$str ne '', which happens to also be used in multiple places
already (sometimes just a few lines further down in the same
files)
-------------------------------------------------------------------
Fri Apr 4 17:04:55 UTC 2025 - Friedrich Haubensak <hsk17@mail.de>

3
texinfo.spec
View File

@@ -1,7 +1,7 @@
#
# spec file for package texinfo
#
# Copyright (c) 2024 SUSE LLC
# Copyright (c) 2025 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -30,6 +30,7 @@ Source2: %{name}.keyring
Source42: %{name}-rpmlintrc
Patch0: texinfo-zlib.patch
Patch1: install-info_exitcode.patch
Patch2: texinfo-perl-5.42.patch
BuildRequires: automake
BuildRequires: glibc-locale
BuildRequires: help2man