diff options
Diffstat (limited to 'Master/tlpkg/installer')
-rwxr-xr-x | Master/tlpkg/installer/install-tl-gui.tcl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Master/tlpkg/installer/install-tl-gui.tcl b/Master/tlpkg/installer/install-tl-gui.tcl index 0e94d6ab1c5..3f5a567c2bf 100755 --- a/Master/tlpkg/installer/install-tl-gui.tcl +++ b/Master/tlpkg/installer/install-tl-gui.tcl @@ -1792,6 +1792,7 @@ proc run_menu {} { update wm state . normal raise . + if {$::tcl_platform(platform) eq "windows"} {wm deiconify .} if {[is_nonempty $::vars(TEXDIR)] && ! $::td_warned} { td_warn $::vars(TEXDIR) } @@ -1971,6 +1972,7 @@ proc run_installer {} { # switch to non-blocking i/o chan configure $::inst -buffering line -blocking 0 chan event $::inst readable read_line_cb + if {$::tcl_platform(platform) eq "windows"} {wm deiconify .} }; # run_installer proc whataboutclose {} { |