diff options
| author | Norbert Preining <preining@logic.at> | 2008-05-16 09:12:55 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-05-16 09:12:55 +0000 |
| commit | 7338c490eca6b743e08a9da622f5918734104731 (patch) | |
| tree | 7d8f54021001d183a6f50e103d52b8b0ae72b2c6 /Master/texmf | |
| parent | 454fd0afc518eeb317e77f1779d59d59bca7c788 (diff) | |
gui-arch.pl: fix an undefined value for the Dialog popup
git-svn-id: svn://tug.org/texlive/trunk@8175 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
| -rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui/gui-arch.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/gui-arch.pl b/Master/texmf/scripts/texlive/tlmgrgui/gui-arch.pl index 3d5853a9735..cb259247dcd 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui/gui-arch.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/gui-arch.pl @@ -60,9 +60,9 @@ sub check_on_removal { if (!$archs{$a} && grep(/^$a$/,@archsinstalled)) { # removal not supported $archs{$a} = 1; - $f->Dialog(-title => "info", - -text => "Removals of archs currently not supported!", - -buttons => [ "Ok" ])->Show; + $arch_frame->Dialog(-title => "info", + -text => "Removals of archs currently not supported!", + -buttons => [ "Ok" ])->Show; } } |