diff options
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/tlpkg/installer/install-menu-text.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl index 665ebec3535..4ee41f79293 100755 --- a/Master/tlpkg/installer/install-menu-text.pl +++ b/Master/tlpkg/installer/install-menu-text.pl @@ -475,7 +475,7 @@ EOF $home = getenv('USERPROFILE') if (win32); $home ||= '~'; if ("\u$answer" eq '1') { - print "New value $maindir [$vars{$maindir}]: "; + print "New value for $maindir [$vars{$maindir}]: "; chomp($answer=<STDIN>); $vars{$maindir}="$answer" if (length $answer); $vars{$maindir}=~s@\\@/@g if (win32); @@ -495,7 +495,7 @@ EOF } } elsif ("\u$answer" eq '2') { - print "New value TEXMFLOCAL [$vars{'TEXMFLOCAL'}]: "; + print "New value for TEXMFLOCAL [$vars{'TEXMFLOCAL'}]: "; chomp($answer=<STDIN>); $vars{'TEXMFLOCAL'}="$answer" if (length $answer); $vars{'TEXMFLOCAL'}=~s@\\@/@g if (win32); @@ -503,7 +503,7 @@ EOF return $command{'self'}; } elsif ("\u$answer" eq '3') { - print "New value TEXMFSYSVAR [$vars{'TEXMFSYSVAR'}]: "; + print "New value for TEXMFSYSVAR [$vars{'TEXMFSYSVAR'}]: "; chomp($answer=<STDIN>); $vars{'TEXMFSYSVAR'}="$answer" if (length $answer); $vars{'TEXMFSYSVAR'}=~s@\\@/@g if (win32); @@ -511,7 +511,7 @@ EOF return $command{'self'}; } elsif ("\u$answer" eq '4') { - print "New value TEXMFSYSCONFIG [$vars{'TEXMFSYSCONFIG'}]: "; + print "New value for TEXMFSYSCONFIG [$vars{'TEXMFSYSCONFIG'}]: "; chomp($answer=<STDIN>); $vars{'TEXMFSYSCONFIG'}="$answer" if (length $answer); $vars{'TEXMFSYSCONFIG'}=~s@\\@/@g if (win32); @@ -519,7 +519,7 @@ EOF return $command{'self'}; } elsif ("\u$answer" eq '5') { - print "New value TEXMFHOME [$vars{'TEXMFHOME'}]: "; + print "New value for TEXMFHOME [$vars{'TEXMFHOME'}]: "; chomp($answer=<STDIN>); $vars{'TEXMFHOME'}="$answer" if (length $answer); $vars{'TEXMFHOME'}=~s@\\@/@g if (win32); |