cpan/Term-Table - Update to version 0.028

0.028     2025-11-26 14:25:55-08:00 America/Los_Angeles

    - Replace '//' with '||' for 5.8 support

Author: Chad Granum

Porting/Maintainers.pl

@@ -1090,8 +1090,8 @@ package Maintainers;
     },
 
     'Term::Table' => {
-        'DISTRIBUTION' => 'EXODIST/Term-Table-0.027.tar.gz',
-        'SYNCINFO'     => 'jkeenan on Sat Nov 15 21:20:44 2025',
+        'DISTRIBUTION' => 'EXODIST/Term-Table-0.028.tar.gz',
+        'SYNCINFO'     => 'jkeenan on Fri Nov 28 08:45:03 2025',
         'FILES'        => q[cpan/Term-Table],
         'EXCLUDED'     => [
             qw( appveyor.yml ),

cpan/Term-Table/lib/Term/Table.pm

@@ -2,7 +2,7 @@ package Term::Table;
 use strict;
 use warnings;
 
-our $VERSION = '0.027';
+our $VERSION = '0.028';
 
 use Term::Table::Cell();
 

cpan/Term-Table/lib/Term/Table/Cell.pm

@@ -2,7 +2,7 @@ package Term::Table::Cell;
 use strict;
 use warnings;
 
-our $VERSION = '0.027';
+our $VERSION = '0.028';
 
 use Term::Table::LineBreak();
 use Term::Table::Util qw/uni_length/;

cpan/Term-Table/lib/Term/Table/CellStack.pm

@@ -2,7 +2,7 @@ package Term::Table::CellStack;
 use strict;
 use warnings;
 
-our $VERSION = '0.027';
+our $VERSION = '0.028';
 
 use Term::Table::HashBase qw/-cells -idx/;
 

cpan/Term-Table/lib/Term/Table/HashBase.pm

@@ -2,7 +2,7 @@ package Term::Table::HashBase;
 use strict;
 use warnings;
 
-our $VERSION = '0.027';
+our $VERSION = '0.028';
 
 #################################################################
 #                                                               #

cpan/Term-Table/lib/Term/Table/LineBreak.pm

@@ -2,7 +2,7 @@ package Term::Table::LineBreak;
 use strict;
 use warnings;
 
-our $VERSION = '0.027';
+our $VERSION = '0.028';
 
 use Carp qw/croak/;
 use Scalar::Util qw/blessed/;

cpan/Term-Table/lib/Term/Table/Spacer.pm

@@ -2,7 +2,7 @@ package Term::Table::Spacer;
 use strict;
 use warnings;
 
-our $VERSION = '0.027';
+our $VERSION = '0.028';
 
 sub new { bless {}, $_[0] }
 

cpan/Term-Table/lib/Term/Table/Util.pm

@@ -5,7 +5,7 @@ use warnings;
 use List::Util qw/max/;
 use Config qw/%Config/;
 
-our $VERSION = '0.027';
+our $VERSION = '0.028';
 
 use base 'Exporter';
 our @EXPORT_OK = qw/term_size USE_GCS USE_TERM_READKEY USE_TERM_SIZE_ANY uni_length/;
@@ -38,7 +38,7 @@ if ($tsa) {
     *USE_TERM_READKEY  = sub() { 0 };
     *USE_TERM_SIZE_ANY = sub() { 1 };
     *_term_size        = sub {
-        my $size = max map { chars($_) // DEFAULT_SIZE } @IO;
+        my $size = max map { chars($_) || DEFAULT_SIZE } @IO;
 
         if (!$size || $size < DEFAULT_SIZE) {
             return $ENV{COLUMNS} if $ENV{COLUMNS} && $ENV{COLUMNS} > DEFAULT_SIZE;