bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Tab completion for yes/no ;)

Browse source
This commit is contained in:
RevBar 2011-06-10 01:23:04 +02:00
parent 9b9c255a1c
commit 35100c59ef
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
revbank
View file

@ -524,7 +524,10 @@ LINE: for (;;) {
if ($deposit) { if ($deposit) {
print "Input '$element' not recognised.\n"; print "Input '$element' not recognised.\n";
for (;;) { for (;;) {
my $yesno = prompt "Add new account for user '$element'? "; my $yesno = prompt(
"Add new account for user '$element'? ",
[ qw/yes no/ ] # tab completion ;)
);
if ($yesno =~ /^(?:y|yes)$/) { if ($yesno =~ /^(?:y|yes)$/) {
create_account($element); create_account($element);
$user = $element; $user = $element;