Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Syntax-Keyword-Try for
openSUSE:Factory checked in at 2025-10-11 22:48:15
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Syntax-Keyword-Try (Old)
and /work/SRC/openSUSE:Factory/.perl-Syntax-Keyword-Try.new.5300 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Syntax-Keyword-Try"
Sat Oct 11 22:48:15 2025 rev:19 rq:1310536 version:0.310.0
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Syntax-Keyword-Try/perl-Syntax-Keyword-Try.changes
2025-01-02 19:19:39.228087380 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Syntax-Keyword-Try.new.5300/perl-Syntax-Keyword-Try.changes
2025-10-11 22:48:25.352702411 +0200
@@ -1,0 +2,12 @@
+Thu Oct 9 20:29:45 UTC 2025 - Tina Müller <[email protected]>
+
+- updated to 0.310.0 (0.31)
+ see /usr/share/doc/packages/perl-Syntax-Keyword-Try/Changes
+
+ 0.31 2025-09-23
+ [BUGFIXES]
+ * Adjust for new `cop_disable_warning()` API added in Perl 5.43.4,
to
+ replace no-longer-visible Perl_new_warnings_bitfield().
+ https://github.com/Perl/perl5/issues/23609
+
+-------------------------------------------------------------------
Old:
----
Syntax-Keyword-Try-0.30.tar.gz
New:
----
README.md
Syntax-Keyword-Try-0.31.tar.gz
_scmsync.obsinfo
build.specials.obscpio
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Syntax-Keyword-Try.spec ++++++
--- /var/tmp/diff_new_pack.gm5EFQ/_old 2025-10-11 22:48:25.948727306 +0200
+++ /var/tmp/diff_new_pack.gm5EFQ/_new 2025-10-11 22:48:25.952727474 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-Syntax-Keyword-Try
#
-# Copyright (c) 2024 SUSE LLC
+# Copyright (c) 2025 SUSE LLC and contributors
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -18,19 +18,20 @@
%define cpan_name Syntax-Keyword-Try
Name: perl-Syntax-Keyword-Try
-Version: 0.300.0
+Version: 0.310.0
Release: 0
-# 0.30 -> normalize -> 0.300.0
-%define cpan_version 0.30
+# 0.31 -> normalize -> 0.310.0
+%define cpan_version 0.31
License: Artistic-1.0 OR GPL-1.0-or-later
Summary: Try/catch/finally syntax for perl
URL: https://metacpan.org/release/%{cpan_name}
Source0:
https://cpan.metacpan.org/authors/id/P/PE/PEVANS/%{cpan_name}-%{cpan_version}.tar.gz
Source1: cpanspec.yml
+Source100: README.md
BuildRequires: perl
BuildRequires: perl-macros
BuildRequires: perl(ExtUtils::CBuilder)
-BuildRequires: perl(Module::Build) >= 0.4004
+BuildRequires: perl(Module::Build) >= 0.400.400
BuildRequires: perl(Test2::V0)
BuildRequires: perl(XS::Parse::Keyword) >= 0.350
BuildRequires: perl(XS::Parse::Keyword::Builder) >= 0.350
@@ -58,7 +59,7 @@
'Syntax::Keyword::Try' on older perls.
%prep
-%autosetup -n %{cpan_name}-%{cpan_version}
+%autosetup -n %{cpan_name}-%{cpan_version} -p1
%build
perl Build.PL --installdirs=vendor optimize="%{optflags}"
++++++ README.md ++++++
## Build Results
Current state of perl in openSUSE:Factory is
The current state of perl in the devel project build (devel:languages:perl)
++++++ Syntax-Keyword-Try-0.30.tar.gz -> Syntax-Keyword-Try-0.31.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/Changes
new/Syntax-Keyword-Try-0.31/Changes
--- old/Syntax-Keyword-Try-0.30/Changes 2024-08-29 18:02:33.000000000 +0200
+++ new/Syntax-Keyword-Try-0.31/Changes 2025-09-23 14:56:40.000000000 +0200
@@ -1,5 +1,11 @@
Revision history for Syntax-Keyword-Try
+0.31 2025-09-23
+ [BUGFIXES]
+ * Adjust for new `cop_disable_warning()` API added in Perl 5.43.4, to
+ replace no-longer-visible Perl_new_warnings_bitfield().
+ https://github.com/Perl/perl5/issues/23609
+
0.30 2024-08-29
[CHANGES]
* Updates for XS::Parse::Keyword v0.35: new container macro names
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/LICENSE
new/Syntax-Keyword-Try-0.31/LICENSE
--- old/Syntax-Keyword-Try-0.30/LICENSE 2024-08-29 18:02:33.000000000 +0200
+++ new/Syntax-Keyword-Try-0.31/LICENSE 2025-09-23 14:56:40.000000000 +0200
@@ -1,4 +1,4 @@
-This software is copyright (c) 2024 by Paul Evans <[email protected]>.
+This software is copyright (c) 2025 by Paul Evans <[email protected]>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -12,7 +12,7 @@
--- The GNU General Public License, Version 1, February 1989 ---
-This software is Copyright (c) 2024 by Paul Evans <[email protected]>.
+This software is Copyright (c) 2025 by Paul Evans <[email protected]>.
This is free software, licensed under:
@@ -272,7 +272,7 @@
--- The Perl Artistic License 1.0 ---
-This software is Copyright (c) 2024 by Paul Evans <[email protected]>.
+This software is Copyright (c) 2025 by Paul Evans <[email protected]>.
This is free software, licensed under:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/MANIFEST
new/Syntax-Keyword-Try-0.31/MANIFEST
--- old/Syntax-Keyword-Try-0.30/MANIFEST 2024-08-29 18:02:33.000000000
+0200
+++ new/Syntax-Keyword-Try-0.31/MANIFEST 2025-09-23 14:56:40.000000000
+0200
@@ -1,6 +1,7 @@
.editorconfig
Build.PL
Changes
+hax/cop_warnings.c.inc
hax/newOP_CUSTOM.c.inc
hax/op_sibling_splice.c.inc
hax/optree-additions.c.inc
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/META.json
new/Syntax-Keyword-Try-0.31/META.json
--- old/Syntax-Keyword-Try-0.30/META.json 2024-08-29 18:02:33.000000000
+0200
+++ new/Syntax-Keyword-Try-0.31/META.json 2025-09-23 14:56:40.000000000
+0200
@@ -40,11 +40,11 @@
"provides" : {
"Syntax::Keyword::Try" : {
"file" : "lib/Syntax/Keyword/Try.pm",
- "version" : "0.30"
+ "version" : "0.31"
},
"Syntax::Keyword::Try::Deparse" : {
"file" : "lib/Syntax/Keyword/Try/Deparse.pm",
- "version" : "0.30"
+ "version" : "0.31"
}
},
"release_status" : "stable",
@@ -54,6 +54,6 @@
],
"x_IRC" : "irc://irc.perl.org/#io-async"
},
- "version" : "0.30",
+ "version" : "0.31",
"x_serialization_backend" : "JSON::PP version 4.16"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/META.yml
new/Syntax-Keyword-Try-0.31/META.yml
--- old/Syntax-Keyword-Try-0.30/META.yml 2024-08-29 18:02:33.000000000
+0200
+++ new/Syntax-Keyword-Try-0.31/META.yml 2025-09-23 14:56:40.000000000
+0200
@@ -18,15 +18,15 @@
provides:
Syntax::Keyword::Try:
file: lib/Syntax/Keyword/Try.pm
- version: '0.30'
+ version: '0.31'
Syntax::Keyword::Try::Deparse:
file: lib/Syntax/Keyword/Try/Deparse.pm
- version: '0.30'
+ version: '0.31'
requires:
XS::Parse::Keyword: '0.35'
perl: '5.014'
resources:
IRC: irc://irc.perl.org/#io-async
license: http://dev.perl.org/licenses/
-version: '0.30'
+version: '0.31'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/hax/cop_warnings.c.inc
new/Syntax-Keyword-Try-0.31/hax/cop_warnings.c.inc
--- old/Syntax-Keyword-Try-0.30/hax/cop_warnings.c.inc 1970-01-01
01:00:00.000000000 +0100
+++ new/Syntax-Keyword-Try-0.31/hax/cop_warnings.c.inc 2025-09-23
14:56:40.000000000 +0200
@@ -0,0 +1,48 @@
+/* vi: set ft=c : */
+
+/* TODO: This only adds cop_disable_warning. Still need to add
+ * cop_has_warning
+ * cop_enable_warning
+ */
+
+#ifndef Perl_Warn_Off_
+# define Perl_Warn_Off_(x) ((x) / 8)
+# define Perl_Warn_Bit_(x) (1 << ((x) % 8))
+#endif
+
+#ifndef cop_disable_warning
+# define cop_disable_warning(cop, warn_bit) S_cop_disable_warning(aTHX_ cop,
warn_bit)
+void S_cop_disable_warning(pTHX_ COP *cop, int warn_bit)
+{
+#if HAVE_PERL_VERSION(5,37,6)
+ /* cop_warnings no longer has the weird STRLEN prefix on it
+ * https://github.com/Perl/perl5/pull/20469
+ */
+ char *warnings = cop->cop_warnings;
+# define WARNING_BITS warnings
+#else
+ STRLEN *warnings = cop->cop_warnings;
+# define WARNING_BITS (char *)(warnings + 1)
+#endif
+ char *warning_bits;
+
+ if(warnings == pWARN_NONE)
+ return;
+
+ if(warnings == pWARN_STD)
+ /* TODO: understand what STD vs ALL means */
+ warning_bits = WARN_ALLstring;
+ else if(warnings == pWARN_ALL)
+ warning_bits = WARN_ALLstring;
+ else
+ warning_bits = WARNING_BITS;
+
+ warnings = Perl_new_warnings_bitfield(aTHX_ warnings, warning_bits,
WARNsize);
+ cop->cop_warnings = warnings;
+
+ warning_bits = WARNING_BITS;
+ warning_bits[Perl_Warn_Off_(2*warn_bit)] &= ~Perl_Warn_Bit_(2*warn_bit);
+
+#undef WARNING_BITS
+}
+#endif
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Syntax-Keyword-Try-0.30/lib/Syntax/Keyword/Try/Deparse.pm
new/Syntax-Keyword-Try-0.31/lib/Syntax/Keyword/Try/Deparse.pm
--- old/Syntax-Keyword-Try-0.30/lib/Syntax/Keyword/Try/Deparse.pm
2024-08-29 18:02:33.000000000 +0200
+++ new/Syntax-Keyword-Try-0.31/lib/Syntax/Keyword/Try/Deparse.pm
2025-09-23 14:56:40.000000000 +0200
@@ -3,7 +3,7 @@
#
# (C) Paul Evans, 2021 -- [email protected]
-package Syntax::Keyword::Try::Deparse 0.30;
+package Syntax::Keyword::Try::Deparse 0.31;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/lib/Syntax/Keyword/Try.pm
new/Syntax-Keyword-Try-0.31/lib/Syntax/Keyword/Try.pm
--- old/Syntax-Keyword-Try-0.30/lib/Syntax/Keyword/Try.pm 2024-08-29
18:02:33.000000000 +0200
+++ new/Syntax-Keyword-Try-0.31/lib/Syntax/Keyword/Try.pm 2025-09-23
14:56:40.000000000 +0200
@@ -3,7 +3,7 @@
#
# (C) Paul Evans, 2016-2023 -- [email protected]
-package Syntax::Keyword::Try 0.30;
+package Syntax::Keyword::Try 0.31;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Syntax-Keyword-Try-0.30/lib/Syntax/Keyword/Try.xs
new/Syntax-Keyword-Try-0.31/lib/Syntax/Keyword/Try.xs
--- old/Syntax-Keyword-Try-0.30/lib/Syntax/Keyword/Try.xs 2024-08-29
18:02:33.000000000 +0200
+++ new/Syntax-Keyword-Try-0.31/lib/Syntax/Keyword/Try.xs 2025-09-23
14:56:40.000000000 +0200
@@ -29,6 +29,7 @@
#include "optree-additions.c.inc"
#include "op_sibling_splice.c.inc"
#include "newOP_CUSTOM.c.inc"
+#include "cop_warnings.c.inc"
static OP *pp_entertrycatch(pTHX);
static OP *pp_catch(pTHX);
@@ -179,38 +180,8 @@
static OP *MY_newSTATEOP_nowarnings(pTHX)
{
OP *op = newSTATEOP(0, NULL, NULL);
-#if HAVE_PERL_VERSION(5,37,6)
- /* cop_warnings no longer has the weird STRLEN prefix on it
- * https://github.com/Perl/perl5/pull/20469
- */
- char *warnings = ((COP *)op)->cop_warnings;
-# define WARNING_BITS warnings
-#else
- STRLEN *warnings = ((COP *)op)->cop_warnings;
-# define WARNING_BITS (char *)(warnings + 1)
-#endif
- char *warning_bits;
-
- if(warnings == pWARN_NONE)
- return op;
-
- if(warnings == pWARN_STD)
- /* TODO: understand what STD vs ALL means */
- warning_bits = WARN_ALLstring;
- else if(warnings == pWARN_ALL)
- warning_bits = WARN_ALLstring;
- else
- warning_bits = WARNING_BITS;
-
- warnings = Perl_new_warnings_bitfield(aTHX_ warnings, warning_bits,
WARNsize);
- ((COP *)op)->cop_warnings = warnings;
-
- warning_bits = WARNING_BITS;
- warning_bits[(2*WARN_EXITING) / 8] &= ~(1 << (2*WARN_EXITING % 8));
-
+ cop_disable_warning((COP *)op, WARN_EXITING);
return op;
-
-#undef WARNING_BITS
}
static void rethread_op(OP *op, OP *old, OP *new)
++++++ _scmsync.obsinfo ++++++
mtime: 1760041786
commit: 783a5753c794862cbc55aea0f56c4a1242b779fca63f4039f5689f1fc6c84950
url: https://src.opensuse.org/perl/perl-Syntax-Keyword-Try.git
revision: 783a5753c794862cbc55aea0f56c4a1242b779fca63f4039f5689f1fc6c84950
projectscmsync: https://src.opensuse.org/perl/_ObsPrj
++++++ build.specials.obscpio ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/.gitignore new/.gitignore
--- old/.gitignore 1970-01-01 01:00:00.000000000 +0100
+++ new/.gitignore 2025-10-10 11:22:55.000000000 +0200
@@ -0,0 +1 @@
+.osc
