diff options
| author | Norbert Preining <preining@logic.at> | 2009-07-08 17:03:44 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2009-07-08 17:03:44 +0000 |
| commit | 82d513da6d3a630f921ad77036408edb696266cb (patch) | |
| tree | 25c3589f6e9af344284d3d4d0aafbed7895472da | |
| parent | e48d0d278c030d16b017e0cb83dc19ece59543e2 (diff) | |
mark window busy when paper is changed
git-svn-id: svn://tug.org/texlive/trunk@14188 c570f23f-e606-0410-a88d-b1316a301751
| -rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl b/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl index 63f65a7dbdf..4f5ccb97d3a 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/gui-config.pl @@ -310,6 +310,7 @@ sub toggle_setting() { sub change_paper { my ($prog, $pap) = @_; + $mw->Busy(-recurse => 1); if ($prog eq "all") { execute_action_gui ("paper", "paper", $pap); init_all_papers(); @@ -317,6 +318,7 @@ sub change_paper { execute_action_gui ( "paper", $prog, "paper", $pap); &{$init_paper_subs{$prog}}(); } + $mw->Unbusy; } sub select_paper { |