diff options
-rw-r--r-- | perl-install/interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index f497c438a..767b54004 100644 --- a/perl-install/interactive.pm +++ b/perl-install/interactive.pm @@ -291,7 +291,7 @@ sub ask_from__add_modify_remove { } } } N_("Add"), if_(@{$e->{list}} > 0, N_("Modify"), N_("Remove"))); $o->ask_from_({ title => $title, messages => $message, callbacks => \%callback }, \@l) or return; - return if !$continue; + return 1 if !$continue; } } } |