Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package os-autoinst for openSUSE:Factory 
checked in at 2026-04-23 17:06:17
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/os-autoinst (Old)
 and      /work/SRC/openSUSE:Factory/.os-autoinst.new.11940 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "os-autoinst"

Thu Apr 23 17:06:17 2026 rev:590 rq:1348814 version:5.1776864280.4119300

Changes:
--------
--- /work/SRC/openSUSE:Factory/os-autoinst/os-autoinst.changes  2026-04-22 
16:58:23.777021312 +0200
+++ /work/SRC/openSUSE:Factory/.os-autoinst.new.11940/os-autoinst.changes       
2026-04-23 17:10:23.807031023 +0200
@@ -2 +2 @@
-Tue Apr 21 09:52:15 UTC 2026 - [email protected]
+Wed Apr 22 13:24:48 UTC 2026 - [email protected]
@@ -4,8 +4,7 @@
-- Update to version 5.1776765124.5d91657:
-  * feat: fail explicitly if always_rollback is not supported
-  * feat: add unique hash to pretty serial markers
-  * feat: include executed command in step details and serial markers
-  * docs: explain assert_screen semantics with multiple tags
-  * feat(debugviewer): Move to /usr/lib
-  * feat(snd2png): Move to /usr/lib
-  * feat: Prefer modules in CASEDIR/lib over test module paths
+- Update to version 5.1776864280.4119300:
+  * style: Enforce ProhibitNegativeExpressionsInUnlessAndUntilConditions
+  * style: Enforce perlcritic policy BuiltinFunctions::ProhibitStringySplit
+  * style: Enforce perlcritic policy BuiltinFunctions::RequireBlockMap
+  * git subrepo pull (merge) --force external/os-autoinst-common
+  * fix(spec): prevent unstable OBS check failures on 28-signalblocker.t
+  * chore(mergify): Update required number of successful checks

Old:
----
  os-autoinst-5.1776765124.5d91657.obscpio

New:
----
  os-autoinst-5.1776864280.4119300.obscpio

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ os-autoinst-devel-test.spec ++++++
--- /var/tmp/diff_new_pack.kuVpS3/_old  2026-04-23 17:10:25.843114794 +0200
+++ /var/tmp/diff_new_pack.kuVpS3/_new  2026-04-23 17:10:25.847114959 +0200
@@ -18,7 +18,7 @@
 
 %define         short_name os-autoinst-devel
 Name:           %{short_name}-test
-Version:        5.1776765124.5d91657
+Version:        5.1776864280.4119300
 Release:        0
 Summary:        Test package for %{short_name}
 License:        GPL-2.0-or-later

++++++ os-autoinst-openvswitch-test.spec ++++++
--- /var/tmp/diff_new_pack.kuVpS3/_old  2026-04-23 17:10:25.887116604 +0200
+++ /var/tmp/diff_new_pack.kuVpS3/_new  2026-04-23 17:10:25.891116769 +0200
@@ -19,7 +19,7 @@
 %define name_ext -test
 %define         short_name os-autoinst-openvswitch
 Name:           %{short_name}%{?name_ext}
-Version:        5.1776765124.5d91657
+Version:        5.1776864280.4119300
 Release:        0
 Summary:        test package for %{short_name}
 License:        GPL-2.0-or-later

++++++ os-autoinst-test.spec ++++++
--- /var/tmp/diff_new_pack.kuVpS3/_old  2026-04-23 17:10:25.919117921 +0200
+++ /var/tmp/diff_new_pack.kuVpS3/_new  2026-04-23 17:10:25.919117921 +0200
@@ -19,7 +19,7 @@
 %define name_ext -test
 %define         short_name os-autoinst
 Name:           %{short_name}%{?name_ext}
-Version:        5.1776765124.5d91657
+Version:        5.1776864280.4119300
 Release:        0
 Summary:        test package for os-autoinst
 License:        GPL-2.0-or-later

++++++ os-autoinst.spec ++++++
--- /var/tmp/diff_new_pack.kuVpS3/_old  2026-04-23 17:10:25.955119402 +0200
+++ /var/tmp/diff_new_pack.kuVpS3/_new  2026-04-23 17:10:25.959119567 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           os-autoinst
-Version:        5.1776765124.5d91657
+Version:        5.1776864280.4119300
 Release:        0
 Summary:        OS-level test automation
 License:        GPL-2.0-or-later
@@ -264,8 +264,9 @@
 # qemu emulation always starts a separate thread
 rm t/28-signalblocker.t
 %endif
-%ifarch aarch64
+%ifarch aarch64 s390x
 # https://progress.opensuse.org/issues/194359
+# https://progress.opensuse.org/issues/199940
 rm -f t/28-signalblocker.t
 %endif
 

++++++ os-autoinst-5.1776765124.5d91657.obscpio -> 
os-autoinst-5.1776864280.4119300.obscpio ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/.mergify.yml 
new/os-autoinst-5.1776864280.4119300/.mergify.yml
--- old/os-autoinst-5.1776765124.5d91657/.mergify.yml   2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/.mergify.yml   2026-04-22 
15:24:40.000000000 +0200
@@ -14,7 +14,7 @@
           # "unresolvable" is not reported in general:
           # 
https://trello.com/c/0N3jHq5M/2257-report-back-to-scm-when-build-results-arent-failed-and-succeeded
           # So we need to require the number of tests explicitly:
-          - "#check-success>=15"
+          - "#check-success>=29"
           - "#check-failure=0"
           - "#check-pending=0"
           - linear-history
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/.perlcriticrc 
new/os-autoinst-5.1776864280.4119300/.perlcriticrc
--- old/os-autoinst-5.1776765124.5d91657/.perlcriticrc  2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/.perlcriticrc  2026-04-22 
15:24:40.000000000 +0200
@@ -1,6 +1,6 @@
 theme = community + openqa
 severity = 4
-include = strict ValuesAndExpressions::ProhibitInterpolationOfLiterals 
CodeLayout::ProhibitParensWithBuiltins
+include = strict ValuesAndExpressions::ProhibitInterpolationOfLiterals 
CodeLayout::ProhibitParensWithBuiltins BuiltinFunctions::RequireBlockMap 
BuiltinFunctions::ProhibitStringySplit 
ControlStructures::ProhibitNegativeExpressionsInUnlessAndUntilConditions
 
 verbose = ::warning file=%f,line=%l,col=%c,title=%m - severity %s::[%p] %e\n
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/backend/baseclass.pm 
new/os-autoinst-5.1776864280.4119300/backend/baseclass.pm
--- old/os-autoinst-5.1776765124.5d91657/backend/baseclass.pm   2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/backend/baseclass.pm   2026-04-22 
15:24:40.000000000 +0200
@@ -1277,7 +1277,7 @@
     my $chan = $self->{serial_chan};
     my $buffer;
     while (defined(my $bytes_read = $chan->read($buffer, 
SSH_SERIAL_READ_BUFFER_SIZE))) {
-        return 1 unless $bytes_read > 0;
+        return 1 if $bytes_read <= 0;
         print $buffer;
         my $serial = path($self->{serialfile})->open('>>')->print($buffer);
     }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/backend/qemu.pm 
new/os-autoinst-5.1776864280.4119300/backend/qemu.pm
--- old/os-autoinst-5.1776765124.5d91657/backend/qemu.pm        2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/backend/qemu.pm        2026-04-22 
15:24:40.000000000 +0200
@@ -831,8 +831,8 @@
         my $vlan = (@nicvlan) ? $nicvlan[-1] : 0;
         $nicvlan[$i] //= $vlan;
     }
-    push @tapscript, 'no' until @tapscript >= $num_networks;    #no TAPSCRIPT 
by default
-    push @tapdownscript, 'no' until @tapdownscript >= $num_networks;    #no 
TAPDOWNSCRIPT by default
+    push @tapscript, 'no' while @tapscript < $num_networks;    #no TAPSCRIPT 
by default
+    push @tapdownscript, 'no' while @tapdownscript < $num_networks;    #no 
TAPDOWNSCRIPT by default
 
     # put it back to the vars for saving
     $vars->{NICMAC} = join ',', @nicmac;
@@ -1049,7 +1049,7 @@
     # The first item will have '-' prepended to it.
     if ($vars->{QEMU_APPEND}) {
         # Split multiple options, if needed
-        my @spl = split ' -', $vars->{QEMU_APPEND};
+        my @spl = split / -/, $vars->{QEMU_APPEND};
         sp(split ' ', $_) for @spl;
     }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/basetest.pm 
new/os-autoinst-5.1776864280.4119300/basetest.pm
--- old/os-autoinst-5.1776765124.5d91657/basetest.pm    2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/basetest.pm    2026-04-22 
15:24:40.000000000 +0200
@@ -322,12 +322,7 @@
     $self->{flags} = $self->test_flags();
     try {
         $self->pre_run_hook();
-        if (defined $self->{run_args}) {
-            $self->run($self->{run_args});
-        }
-        else {
-            $self->run();
-        }
+        $self->run($self->{run_args} // ());
         $self->post_run_hook();
     }
     catch ($e) {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/bmwqemu.pm 
new/os-autoinst-5.1776864280.4119300/bmwqemu.pm
--- old/os-autoinst-5.1776765124.5d91657/bmwqemu.pm     2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/bmwqemu.pm     2026-04-22 
15:24:40.000000000 +0200
@@ -177,12 +177,12 @@
         my $size = $vars{"HDDSIZEGB_$i"} // $vars{HDDSIZEGB} // 
default_hdd_size_gb();
         $total_hdd_size_gb += $size;
     }
-    return undef unless $total_hdd_size_gb > 0;
+    return undef if $total_hdd_size_gb <= 0;
     my ($total_storage, $available) = _get_storage_stats('.');
     return warn "Could not determine available storage space\n" unless defined 
$total_storage;
     my $requested_bytes = $total_hdd_size_gb * GIB;
     my $min_free_bytes = $total_storage * $keep_free;
-    return undef unless $requested_bytes > $available - $min_free_bytes;
+    return undef if $requested_bytes <= $available - $min_free_bytes;
     my $msg = sprintf 'Not enough storage for requested HDDSIZEGB (requested 
%d GiB, available %d GiB, total %d GiB, keep-free %d%%)',
       $total_hdd_size_gb, int($available / GIB), int($total_storage / GIB), 
int($keep_free * 100);
     serialize_state(result => 'incomplete', msg => $msg);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/consoles/VNC.pm 
new/os-autoinst-5.1776864280.4119300/consoles/VNC.pm
--- old/os-autoinst-5.1776765124.5d91657/consoles/VNC.pm        2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/consoles/VNC.pm        2026-04-22 
15:24:40.000000000 +0200
@@ -671,7 +671,7 @@
 
     my @events;
 
-    for my $key (split '-', $keys) {
+    for my $key (split /-/, $keys) {
         if (defined($self->keymap->{$key})) {
             if (ref($self->keymap->{$key}) eq 'ARRAY') {
                 push @events, @{$self->keymap->{$key}};
@@ -813,7 +813,7 @@
     return unless $ret;
     $self->_vnc_stalled(0);
 
-    die "socket closed: $ret\n${\Dumper $self}" unless $ret > 0;
+    die "socket closed: $ret\n${\Dumper $self}" if $ret <= 0;
 
     $message_type = unpack 'C', $message_type;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/consoles/sshVirtsh.pm 
new/os-autoinst-5.1776864280.4119300/consoles/sshVirtsh.pm
--- old/os-autoinst-5.1776765124.5d91657/consoles/sshVirtsh.pm  2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/consoles/sshVirtsh.pm  2026-04-22 
15:24:40.000000000 +0200
@@ -642,7 +642,7 @@
             } elsif ($fb_tool eq 'cloud-init') {
                 croak 'GUESTINFO_CLOUD_INIT is unset, or does not contain 
user-data and meta-data configs' unless ($bmwqemu::vars{GUESTINFO_CLOUD_INIT});
 
-                my ($conf, $meta) = split ',', 
$bmwqemu::vars{GUESTINFO_CLOUD_INIT};
+                my ($conf, $meta) = split /,/, 
$bmwqemu::vars{GUESTINFO_CLOUD_INIT};
                 $self->run_cmd(qq{echo 'guestinfo.userdata.encoding = 
"$encoding"' >> $vmx}, domain => 'sshVMwareServer');
                 $self->run_cmd(qq{echo 'guestinfo.metadata.encoding = 
"$encoding"' >> $vmx}, domain => 'sshVMwareServer');
                 $conf = $self->_encode_config($conf, 'GUESTINFO_CLOUD_INIT');
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/consoles/sshXtermVt.pm 
new/os-autoinst-5.1776864280.4119300/consoles/sshXtermVt.pm
--- old/os-autoinst-5.1776765124.5d91657/consoles/sshXtermVt.pm 2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/consoles/sshXtermVt.pm 2026-04-22 
15:24:40.000000000 +0200
@@ -54,7 +54,7 @@
 
     bmwqemu::diag("Wait for SSH on host $hostname (timeout: $args{timeout})");
 
-    $args{timeout} = 1 unless $args{timeout} > 0;
+    $args{timeout} = 1 if $args{timeout} <= 0;
     my $endtime = time() + $args{timeout};
     while (time() < $endtime) {
         my $sock = IO::Socket::INET->new(PeerAddr => $hostname, PeerPort => 
$args{port}, Proto => 'tcp', Timeout => 1);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/consoles/video_base.pm 
new/os-autoinst-5.1776864280.4119300/consoles/video_base.pm
--- old/os-autoinst-5.1776765124.5d91657/consoles/video_base.pm 2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/consoles/video_base.pm 2026-04-22 
15:24:40.000000000 +0200
@@ -50,7 +50,7 @@
         $seconds_per_keypress += 1 / sqrt($args->{max_interval});
     }
 
-    for my $letter (split '', $args->{text}) {
+    for my $letter (split //, $args->{text}) {
         next if ($letter eq "\r");
         $letter = $CHARMAP->{$letter} || $letter;
         # 50% of the delay used on key press, 50% searching the next key
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/consoles/video_stream.pm 
new/os-autoinst-5.1776864280.4119300/consoles/video_stream.pm
--- old/os-autoinst-5.1776765124.5d91657/consoles/video_stream.pm       
2026-04-21 11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/consoles/video_stream.pm       
2026-04-22 15:24:40.000000000 +0200
@@ -221,7 +221,7 @@
 
     return undef unless $ret;
 
-    die "ffmpeg closed: $ret\n${\Dumper $self}" unless $ret > 0;
+    die "ffmpeg closed: $ret\n${\Dumper $self}" if $ret <= 0;
 
     # support P6 only
     if (!($header =~ m/^(P6\n(\d+) (\d+)\n(\d+)\n)/)) {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/consoles/virtio_terminal.pm 
new/os-autoinst-5.1776864280.4119300/consoles/virtio_terminal.pm
--- old/os-autoinst-5.1776765124.5d91657/consoles/virtio_terminal.pm    
2026-04-21 11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/consoles/virtio_terminal.pm    
2026-04-22 15:24:40.000000000 +0200
@@ -60,7 +60,7 @@
 sub screen ($self) { $self->{screen} }
 
 sub disable ($self) {
-    return undef unless $self->{fd_read} > 0;
+    return undef if $self->{fd_read} <= 0;
     close $self->{fd_read};
     close $self->{fd_write};
     $self->{fd_read} = 0;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/dist/rpm/os-autoinst.spec 
new/os-autoinst-5.1776864280.4119300/dist/rpm/os-autoinst.spec
--- old/os-autoinst-5.1776765124.5d91657/dist/rpm/os-autoinst.spec      
2026-04-21 11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/dist/rpm/os-autoinst.spec      
2026-04-22 15:24:40.000000000 +0200
@@ -264,8 +264,9 @@
 # qemu emulation always starts a separate thread
 rm t/28-signalblocker.t
 %endif
-%ifarch aarch64
+%ifarch aarch64 s390x
 # https://progress.opensuse.org/issues/194359
+# https://progress.opensuse.org/issues/199940
 rm -f t/28-signalblocker.t
 %endif
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/external/os-autoinst-common/.gitrepo 
new/os-autoinst-5.1776864280.4119300/external/os-autoinst-common/.gitrepo
--- old/os-autoinst-5.1776765124.5d91657/external/os-autoinst-common/.gitrepo   
2026-04-21 11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/external/os-autoinst-common/.gitrepo   
2026-04-22 15:24:40.000000000 +0200
@@ -6,7 +6,7 @@
 [subrepo]
        remote = [email protected]:os-autoinst/os-autoinst-common.git
        branch = master
-       commit = 4e71e20292cd76298e53e9726e4d2b49be0eb7e0
-       parent = 6913c369c5314bdc441fe373a954d42f3b15aebb
+       commit = 0e48179240f9383db02b76a265e15f865e632ff3
+       parent = bd0b68ebfb3129b3a34d3c908b5644f630050ba6
        method = merge
        cmdver = 0.4.6
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/external/os-autoinst-common/tools/prove_wrapper
 
new/os-autoinst-5.1776864280.4119300/external/os-autoinst-common/tools/prove_wrapper
--- 
old/os-autoinst-5.1776765124.5d91657/external/os-autoinst-common/tools/prove_wrapper
        2026-04-21 11:52:04.000000000 +0200
+++ 
new/os-autoinst-5.1776864280.4119300/external/os-autoinst-common/tools/prove_wrapper
        2026-04-22 15:24:40.000000000 +0200
@@ -26,6 +26,8 @@
 fi
 
 UNHANDLED=$(sed --regexp-extended \
+    -e 's/\x1b\[[0-9;]*[mK]//g' \
+    -e 's/\r//g' \
     -e 's/^\[[0-9]{2}:[0-9]{2}:[0-9]{2}\][[:space:]]*//' \
     -e '/x?t\/.*\.t\s*\.+/d' \
     -e '/\s*[0-9]+\.\.[0-9]+.*/d' \
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/needle.pm 
new/os-autoinst-5.1776864280.4119300/needle.pm
--- old/os-autoinst-5.1776765124.5d91657/needle.pm      2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/needle.pm      2026-04-22 
15:24:40.000000000 +0200
@@ -189,7 +189,7 @@
     my @cache_items = values %image_cache;
     my $cache_size = scalar @cache_items;
     my $to_delete = $cache_size - $limit;
-    return unless $to_delete > 0 && $to_delete <= $cache_size;
+    return if $to_delete <= 0 || $to_delete > $cache_size;
 
     # sort the cache items by their last use (ascending)
     my @sorted_cache_items = sort { $a->{last_use} <=> $b->{last_use} } 
@cache_items;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/os-autoinst-5.1776765124.5d91657/osutils.pm 
new/os-autoinst-5.1776864280.4119300/osutils.pm
--- old/os-autoinst-5.1776765124.5d91657/osutils.pm     2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/osutils.pm     2026-04-22 
15:24:40.000000000 +0200
@@ -98,7 +98,7 @@
 sub attempt {    # no:style:signatures
     my $attempts = 0;
     my ($total_attempts, $condition, $cb, $or) = ref $_[0] eq 'HASH' ? 
(@{$_[0]}{qw(attempts condition cb or)}) : @_;
-    until ($condition->() || $attempts >= $total_attempts) {
+    while (!$condition->() && $attempts < $total_attempts) {
         bmwqemu::diag "Waiting for $attempts attempts";
         $cb->();
         wait_attempt;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/script/os-autoinst-openvswitch 
new/os-autoinst-5.1776864280.4119300/script/os-autoinst-openvswitch
--- old/os-autoinst-5.1776765124.5d91657/script/os-autoinst-openvswitch 
2026-04-21 11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/script/os-autoinst-openvswitch 
2026-04-22 15:24:40.000000000 +0200
@@ -76,7 +76,7 @@
     my $netmask_ipv6 = $ENV{OS_AUTOINST_BRIDGE_NETMASK_IPV6} // 63;
     # we also need a hex-converted form of the rewrite target, thanks
     # https://www.perlmonks.org/?node_id=704295
-    my $rewrite_target_hex = unpack 'H*', pack 'C*', split '\.', 
$rewrite_target;
+    my $rewrite_target_hex = unpack 'H*', pack 'C*', split /\./, 
$rewrite_target;
     my $rewrite_target_hex_ipv6 = 'fec0:0000:0000:0001:0000:0000:0000:0000';
     $rewrite_target_hex_ipv6 =~ s/://g;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/t/28-signalblocker.t 
new/os-autoinst-5.1776864280.4119300/t/28-signalblocker.t
--- old/os-autoinst-5.1776765124.5d91657/t/28-signalblocker.t   2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/t/28-signalblocker.t   2026-04-22 
15:24:40.000000000 +0200
@@ -26,7 +26,7 @@
 my $no_signal_blocker = $ENV{OS_AUTOINST_TEST_NO_SIGNAL_BLOCKER};
 
 # define a helper to find the number of threads spawned by this test
-sub thread_count () { scalar split "\n", qx{ps huH p $$} }
+sub thread_count () { scalar split /\n/, qx{ps huH p $$} }
 is(my $last_thread_count = thread_count, 1, 'initially one thread');
 
 # count SIGTERMs we receive; those handlers should work after 
creating/destroying the signal blocker
@@ -67,7 +67,7 @@
 my $timeout = 5;
 exec bash => '-e', '-c', "for i in {1..100}; do echo \"# sending SIGTERM \$i\" 
&& kill $pid; done" unless my $fork = fork;
 waitpid $fork, 0;
-note 'waiting for at least one signal to be handled' and sleep .2 until 
$received_sigterm >= 1 || ($timeout -= .2) < 0;
+note 'waiting for at least one signal to be handled' and sleep .2 while 
$received_sigterm < 1 && ($timeout -= .2) >= 0;
 note "handled $received_sigterm TERM signals";
 ok($received_sigterm > 0, "received SIGTERM $received_sigterm times; no 
crashes after at least 200 ms idling time");
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/t/44-llm-failure-analysis.t 
new/os-autoinst-5.1776864280.4119300/t/44-llm-failure-analysis.t
--- old/os-autoinst-5.1776765124.5d91657/t/44-llm-failure-analysis.t    
2026-04-21 11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/t/44-llm-failure-analysis.t    
2026-04-22 15:24:40.000000000 +0200
@@ -46,8 +46,8 @@
     path($bmwqemu::result_dir)->child('autoinst-log.txt')->spew(join "\n", map 
{ "L$_" } 1 .. 300);
     path($bmwqemu::result_dir)->child('serial0')->spew(join "\n", map { "S$_" 
} 1 .. 150);
     $ctx = 
OpenQA::Isotovideo::LLMAnalysis::gather_context($bmwqemu::result_dir);
-    is scalar(split "\n", $ctx->{log_tail}), 200, 'Log tail truncated';
-    is scalar(split "\n", $ctx->{serial_tail}), 100, 'Serial tail truncated';
+    is scalar(split /\n/, $ctx->{log_tail}), 200, 'Log tail truncated';
+    is scalar(split /\n/, $ctx->{serial_tail}), 100, 'Serial tail truncated';
 
     # Empty files
     path($bmwqemu::result_dir)->child('autoinst-log.txt')->spew('');
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/os-autoinst-5.1776765124.5d91657/tools/check_coverage 
new/os-autoinst-5.1776864280.4119300/tools/check_coverage
--- old/os-autoinst-5.1776765124.5d91657/tools/check_coverage   2026-04-21 
11:52:04.000000000 +0200
+++ new/os-autoinst-5.1776864280.4119300/tools/check_coverage   2026-04-22 
15:24:40.000000000 +0200
@@ -16,5 +16,5 @@
 my @matches = $summary_line =~ /(?<=>)[0-9.]+(?=<)/g;
 # for now just compare the last number, i.e. the total coverage against a
 # threshold
-die 'No coverage found' unless scalar @matches > 0;
+die 'No coverage found' unless @matches;
 die "Coverage is below threshold: $matches[-1] < $ARGV[0]" if ($matches[-1] < 
$ARGV[0]);

++++++ os-autoinst.obsinfo ++++++
--- /var/tmp/diff_new_pack.kuVpS3/_old  2026-04-23 17:10:28.879239002 +0200
+++ /var/tmp/diff_new_pack.kuVpS3/_new  2026-04-23 17:10:28.887239325 +0200
@@ -1,5 +1,5 @@
 name: os-autoinst
-version: 5.1776765124.5d91657
-mtime: 1776765124
-commit: 5d91657133aff9d9050b3837c9abc21c14d03cff
+version: 5.1776864280.4119300
+mtime: 1776864280
+commit: 411930079c2988d5602e92036a130fc0d6496820
 

Reply via email to