diff options
-rwxr-xr-x | Master/tlpkg/installer/install-menu-text.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl index 743fdf955c7..0da5b74b037 100755 --- a/Master/tlpkg/installer/install-menu-text.pl +++ b/Master/tlpkg/installer/install-menu-text.pl @@ -81,7 +81,9 @@ sub other_options { sub prompt { my $prompt=shift; print "\n$prompt: "; - chomp(my $answer=<STDIN>); + my $answer = <STDIN>; + $answer = "q" if !defined($answer); + chomp($answer); return "$answer"; } |