Subject: | A few minor bugs in v2.54 |
Date: | Sat, 18 Jan 2014 17:48:20 +0100 |
To: | bug-Term-Menus [...] rt.cpan.org |
From: | Reuben Trapdoor <reubentrapdoor [...] gmail.com> |
OS: Ubuntu 12.04.4 LTS, Linux 3.2.0-58-generic #88-Ubuntu SMP Tue Dec 3
17:37:58 UTC 2013 x86_64 x86_64 x86_64 GNU/Linux
Perl: v5.14.2
Term::Menus version: 2.54 - 16. december 2013
1) Debugging variable for screen clearing is enabled on like 1011 of
Menus.pm:
our $noclear=0; # set to one to turn off clear for debugging
2) When you use '*' to view selected items before a selection has been
made (pointless when no defaults), a new menu is shown. If you press "<"
on this menu to return, you get the following error:
"Can't use an undefined value as a HASH reference at
/usr/local/share/perl/5.14.2/Term/Menus.pm line 3565."
You also get the exact same error if you press '*' and then "<" with
default selections enabled, before you have made any changes to the
selections.
3) Sorting with %, then reverse sorting with % gives the following error:
Can't use string ("5") as a HASH ref while "strict refs" in use at
/usr/local/share/perl/5.14.2/Term/Menus.pm line 3223.
The bugs can be reproduced with this script:
#!/usr/bin/env perl
use Term::Menus;
my @choices = ('Choice one', 'Coice two', 'Choice three', 'Choice four',
'And choice five');
my %Menu_1 = (
Item_1 => {
Text => "]C[",
Convey => \@choices,
# Default => qr/./,
},
Select => 'Many',
);
my @selection = &Menu (\%Menu_1);
print "You selected '@selection'!\n";