temporary fix, there is something bad with compare, it doesn't return undef,

and it's not even clear it actually can without breaking something else.
This commit is contained in:
espie 2022-10-26 12:45:52 +00:00
parent 42131ac0f9
commit 848578837f
1 changed files with 2 additions and 2 deletions

View File

@ -1,7 +1,7 @@
#! /usr/bin/perl
# ex:ts=8 sw=4:
# $OpenBSD: pkg_check-version,v 1.4 2022/04/19 14:10:31 espie Exp $
# $OpenBSD: pkg_check-version,v 1.5 2022/10/26 12:45:52 espie Exp $
#
# Copyright (c) 2021 Marc Espie <espie@openbsd.org>
#
@ -148,7 +148,7 @@ sub parse_and_run
$newer = shift @sorted;
next if !defined $older;
my $r = $older->compare($newer);
next if !defined $r;
next if defined $r;
$state->errsay(
"WARNING: #1 and #2 are actually not comparable",
$older->to_string, $newer->to_string);