Skip Menu |

This queue is for tickets about the Catalyst-Runtime CPAN distribution.

Report information
The Basics
Id: 97615
Status: resolved
Priority: 0/
Queue: Catalyst-Runtime

People
Owner: Nobody in particular
Requestors: i.mitry [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: Use $ENV{COLUMNS} fist in Catalyst::Utils::term_width
Date: Wed, 30 Jul 2014 09:11:31 +0300
To: bug-Catalyst-Runtime [...] rt.cpan.org
From: Mitry Matyushkov <i.mitry [...] gmail.com>
Please check $ENV{COLUMNS} value fist in Catalyst::Utils::term_width and if it is not set then try to guess terminal width via Term::Size::Any. Current implementation does not look at $ENV{COLUMNS} at all if Term::Size::Any is installed. ``` $ perl -MTerm::Size::Any -e 'print Term::Size::Any::chars . "\n"' 124 $ perl -MCatalyst::Utils -e 'print Catalyst::Utils::term_width . "\n"' 124 correct $ COLUMNS=80 perl -MCatalyst::Utils -e 'print Catalyst::Utils::term_width . "\n"' 124 incorrect -> should be 80 ``` Thanks.
I believe this is good now, closing. please reopen with a test case if its not fixed. On Wed Jul 30 02:11:46 2014, i.mitry@gmail.com wrote: Show quoted text
> Please check $ENV{COLUMNS} value fist in Catalyst::Utils::term_width and > if it is not set then try to guess terminal width via Term::Size::Any. > > Current implementation does not look at $ENV{COLUMNS} at all if > Term::Size::Any is installed. > > ``` > $ perl -MTerm::Size::Any -e 'print Term::Size::Any::chars . "\n"' > 124 > > $ perl -MCatalyst::Utils -e 'print Catalyst::Utils::term_width . "\n"' > 124 > correct > > $ COLUMNS=80 perl -MCatalyst::Utils -e 'print > Catalyst::Utils::term_width . "\n"' > 124 > incorrect -> should be 80 > ``` > > Thanks.
I believe this is good now, closing. please reopen with a test case if its not fixed. On Wed Jul 30 02:11:46 2014, i.mitry@gmail.com wrote: Show quoted text
> Please check $ENV{COLUMNS} value fist in Catalyst::Utils::term_width and > if it is not set then try to guess terminal width via Term::Size::Any. > > Current implementation does not look at $ENV{COLUMNS} at all if > Term::Size::Any is installed. > > ``` > $ perl -MTerm::Size::Any -e 'print Term::Size::Any::chars . "\n"' > 124 > > $ perl -MCatalyst::Utils -e 'print Catalyst::Utils::term_width . "\n"' > 124 > correct > > $ COLUMNS=80 perl -MCatalyst::Utils -e 'print > Catalyst::Utils::term_width . "\n"' > 124 > incorrect -> should be 80 > ``` > > Thanks.