summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-07-28 20:45:27 +0000
committerNorbert Preining <preining@logic.at>2008-07-28 20:45:27 +0000
commit7f64de2a3b0b1df20e9d2b1b62c18cebb353b17f (patch)
tree07297afa0a9e5b5c03acf72cf59cf7139e89e77f
parent7f4ebcfb84d0a56c24cb3032f8759fddfd4c3b7a (diff)
tlmgrgui: use a dialogbox instead of dialog since that uses a different font
and messes with lines. And also allow colons in the translated texts! git-svn-id: svn://tug.org/texlive/trunk@9848 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl11
1 files changed, 7 insertions, 4 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl
index c437e34c68f..959d7ad8cd5 100755
--- a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl
@@ -194,7 +194,7 @@ if (defined($LANG) && (-r "$Master/texmf/scripts/texlive/tlmgrgui/lang/$LANG"))
chomp;
next if m/^\s*#/;
next if m/^\s*$/;
- my ($a,$b) = split(/:/,$_);
+ my ($a,$b) = split(/:/,$_,2);
$b =~ s/^\s*([^\s])/$1/;
$b =~ s/\s*$//;
next if ($b =~ m/^\s*$/);
@@ -528,9 +528,12 @@ sub update_selected_packages {
if (win32() && $updater_needed) {
my $t = ___"runupdater";
$t =~ s/TEXROOT/$Master/;
- $mw->Dialog(-title => "updater needed",
- -text => $t,
- -buttons => [ ___"ok" ])->Show;
+ my $sw = $mw->DialogBox(-title => "updater needed", -buttons => [ ___"ok" ]);
+ $sw->add("Label", -text => $t)->pack;
+ $sw->Show;
+ #$mw->Dialog(-title => "updater needed",
+ # -text => $t,
+ # -buttons => [ ___"ok" ])->Show;
}
reinit_local_tlpdb();
}