From c44bed4f6fca084d9078e49132b9abdb0d9dd530 Mon Sep 17 00:00:00 2001 From: Siep Kroonenberg Date: Sat, 2 Aug 2008 09:36:22 +0000 Subject: Spaces in text.hinthome git-svn-id: svn://tug.org/texlive/trunk@10006 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/installer/install-menu-perltk.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Master/tlpkg/installer') diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl index 24f347917fa..bb91120e489 100644 --- a/Master/tlpkg/installer/install-menu-perltk.pl +++ b/Master/tlpkg/installer/install-menu-perltk.pl @@ -129,7 +129,7 @@ my %text = ( title => 'TeX Live 2008 Installation', status => 'Status output', changevar => 'Change variable value', enterpath => 'Enter path for', - hinthome => ' (use ~ for HOME/USERPROFILE)', + hinthome => '(use ~ for HOME/USERPROFILE)', selectscheme => 'Select a Scheme', selectstdcol => 'Select the collections to be installed', selectall => 'Select All', @@ -411,7 +411,7 @@ sub menu_edit_vars_value { $sw->transient($mainwindow); $sw->grab(); my $val = $vars{$key}; - $sw->Label(-text => $text{'enterpath'} . " $key:" . $text{'hinthome'})->pack(-padx => "2m", -pady => "2m"); + $sw->Label(-text => $text{'enterpath'} . " $key: " . $text{'hinthome'})->pack(-padx => "2m", -pady => "2m"); my $entry = $sw->Entry(-textvariable => $val, -width => 60); $entry->pack(-padx => "2m", -pady => "2m"); my $f = $sw->Frame; -- cgit v1.2.3