summaryrefslogtreecommitdiff
path: root/Master/texmf
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2012-05-22 22:46:00 +0000
committerNorbert Preining <preining@logic.at>2012-05-22 22:46:00 +0000
commitff83082dc566fd4fcfd2e67b9d09310d8d699fd5 (patch)
tree69539f1fe70ea1e2ac74a0b90512eb4b715e0a9f /Master/texmf
parent6ca2c2532880aa10aed5711e5971ffb758e7fe75 (diff)
add a our declaration to make some perls happy
git-svn-id: svn://tug.org/texlive/trunk@26574 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
-rw-r--r--Master/texmf/scripts/texlive/tlmgrgui.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui.pl b/Master/texmf/scripts/texlive/tlmgrgui.pl
index 9899078a302..3319438bd67 100644
--- a/Master/texmf/scripts/texlive/tlmgrgui.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui.pl
@@ -1576,6 +1576,7 @@ sub menu_multi_location {
});
$ref->{'chg_w'} = $f1->Button(-text => __("Change"),
-command => sub {
+ our $sw;
my $ret = ask_one_repository($sw, __("Change " . ($t eq "main" ? "main" : "subsidiary") . " package repository"),
__(($t eq "main" ? "Change main" : "New subsidiary") . " package repository"));
$ref->{'val'} = $ret if (defined($ret));