mirror/perl
1
0
Fork 0
mirror of https://github.com/Perl/perl5.git synced 2026-01-26 08:38:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

cpan/Term-Table - Update to version 0.028

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

    - Replace '//' with '||' for 5.8 support
This commit is contained in:
Chad Granum 2025-11-28 08:45:32 -05:00 committed by James E Keenan
parent 1ada799b3c
commit 23a787ab62
8 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Porting/Maintainers.pl
View File

@ -1090,8 +1090,8 @@ our %Modules = (
},
'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 ),

2
cpan/Term-Table/lib/Term/Table.pm
View File

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

2
cpan/Term-Table/lib/Term/Table/Cell.pm
View File

@ -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/;

2
cpan/Term-Table/lib/Term/Table/CellStack.pm
View File

@ -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/;

2
cpan/Term-Table/lib/Term/Table/HashBase.pm
View File

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

2
cpan/Term-Table/lib/Term/Table/LineBreak.pm
View File

@ -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/;

2
cpan/Term-Table/lib/Term/Table/Spacer.pm
View File

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

4
cpan/Term-Table/lib/Term/Table/Util.pm
View File

@ -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;