browser: replace remaining smart-match operator

Equivalent without perl warning since v1.19-30-gee5b8a7f10 (2024-09-02)
[replace smartmatch by equivalent syntax].

diff --git a/browser.plp b/browser.plp
index fe96312f6d74afcab57c1598be1e6177a8006689..a100bcb3923a6b4f69f3c597e1f054620412beaa 100644 (file)
--- a/browser.plp
+++ b/browser.plp
@@ -390,7 +390,7 @@ sub saybrowsercols {
                        // $prev                     # inherit from predecessor
                        || 'u'                       # unsure
                );
-               if (defined $prev and not $prev ~~ $compare) {
+               if (defined $prev and not (defined $compare and $prev eq $compare)) {
                        # different columns
                        my @vercover = (map { @{$_} } @span);  # accumulated conforming versions
                        for ($ver ? @{$ver} : ()) {