I'm trying to learn to use Curses::UI, and I read the top of "perldoc
Curses::UI" and found some example code. Unfortunately, it doesn't work.
This is my program:
#!/usr/bin/perl
use strict;
use warnings;
use Curses::UI;
my $cui = new Curses::UI (-color_support => 1);
my $my = $cui->dialog(
-message => 'Hello World.',
-buttons => ['< Yes >', '< No >'],
-values => [1, 0],
-title => 'First Dialog',
);
__END__
When I run this program, I get this error message:
Fatal program error:
------------------------------------------
process_buttondefs(): Invalid button type.
No definition found for '< Yes >'
------------------------------------------
Press any key to exit...
But when I comment out the line containing "-buttons...," the program
works. Does anyone know how I get this to work with the "-buttons..."
line active?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
