summaryrefslogtreecommitdiff
path: root/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl')
-rw-r--r--Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl10
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl b/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl
index d942e8ae0c9..76caa2d4c75 100644
--- a/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui/gui-uninstall.pl
@@ -6,27 +6,27 @@
# GUI for tlmgr
#
-our $back_f3 = $back->add("uninstall", -label => _"removaltab");
+our $back_f3 = $back->add("uninstall", -label => ___"removaltab");
$screens{"uninstall"} = $back_f3;
if ($^O=~/^MSWin(32|64)$/i) {
my $lab = $back_f3->Label(-justify => 'left',
- -text => _"pleaseuse");
+ -text => ___"pleaseuse");
$lab->pack(-padx => "10m", -pady => "5m");
} else {
my $lab = $back_f3->Label(-justify => 'left',
- -text => _"reallyremove");
+ -text => ___"reallyremove");
$lab->pack(-padx => "10m", -pady => "5m");
my $f = $back_f3->Frame;
$f->pack(-padx => "10m", -pady => "5m");
- my $ok = $f->Button(-text => _"removetl",
+ my $ok = $f->Button(-text => ___"removetl",
-command => sub {
system("tlmgr", "uninstall", "--force");
- $mw->Dialog(-text => _"completerem", -buttons => [ _"ok" ])->Show;
+ $mw->Dialog(-text => ___"completerem", -buttons => [ ___"ok" ])->Show;
$mw->destroy;
exit(0);
});