| Subject: | lots of warnings when trying to use VBox |
| Date: | Tue, 1 Mar 2011 17:19:48 +0200 |
| To: | bug-Curses-Toolkit [...] rt.cpan.org |
| From: | Gabor Szabo <szabgab [...] gmail.com> |
using Curses-Toolkit-0.203 on perl 5.10.0 I have the following script:
#!/usr/bin/perl
use strict;
use warnings;
use POE::Component::Curses;
use Curses::Toolkit::Widget::Window;
use Curses::Toolkit::Widget::Label;
use Curses::Toolkit::Widget::Border;
use Curses::Toolkit::Widget::VBox;
my $root = POE::Component::Curses->spawn;
my $window =
Curses::Toolkit::Widget::Window->new->set_name('window')->set_title("window")
->set_coordinates( x1 => 5, y1 => 5, width => 40, height => 15 );
$root->add_window($window);
my $list = Curses::Toolkit::Widget::VBox->new;
$window->add_widget($list);
foreach my $c ('a' .. 'f') {
my $label = Curses::Toolkit::Widget::Label->new->set_text($c);
$list->pack_end($label);
}
POE::Kernel->run();
=========================
It works but gives lots of warnings:
=========================
Show quoted text
> perl ~/bin/svn.pl
Constant subroutine POE::Component::Curses::MainLoop::OBJECT redefined
at /usr/lib/perl5/site_perl/5.10.0/x86_64-linux-thread-multi/Params/Validate.pm
line 22
Constant subroutine POE::Component::Curses::OBJECT redefined at
/home/gabor/perl5/lib/perl5/POE/Component/Curses.pm line 23
Use of uninitialized value within %params in pattern match (m//) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/Window.pm line 210.
Use of uninitialized value within %params in pattern match (m//) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/Window.pm line 220.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 140.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 149.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 140.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 149.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 140.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 149.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 140.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 149.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 140.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 149.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 140.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 149.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 140.
Use of uninitialized value in addition (+) at
/home/gabor/perl5/lib/perl5/Curses/Toolkit/Widget/VBox.pm line 149.