summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2021-04-07 03:01:59 +0000
committerNorbert Preining <norbert@preining.info>2021-04-07 03:01:59 +0000
commit70fe7f94e8281b0691a51754da3e2d40b1dd7732 (patch)
treef4be4cdf15aa796af9ae46eaf33d24279659cdb9 /systems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl
parente4d1c68b2517d031bb9adc055fe19d1051c81042 (diff)
CTAN sync 202104070301
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl')
-rwxr-xr-xsystems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl10
1 files changed, 3 insertions, 7 deletions
diff --git a/systems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl b/systems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl
index 455641f4db..66ba9a0252 100755
--- a/systems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl
+++ b/systems/texlive/tlnet/tlpkg/installer/install-tl-gui.tcl
@@ -1644,6 +1644,7 @@ proc run_menu {} {
ttk::checkbutton .srcb -variable ::vars(tlpdbopt_install_srcfiles) \
-command {update_vars; show_stats}
pgrid .srcb -in $curf -row $rw -column 2 -sticky e
+ puts stderr [bindtags .srcb]
}
}
@@ -1698,14 +1699,9 @@ proc run_menu {} {
pgrid [ttk::label .texwl -text [__ "Install TeXworks front end"]] \
-in $curf -row $rw -column 0 -columnspan 2 -sticky w
ttk::checkbutton .texwb -variable ::vars(collection-texworks)
+ .texwb configure -command \
+ {set ::vars(selected_scheme) "scheme-custom"; update_vars; show_stats}
pgrid .texwb -in $curf -row $rw -column 2 -sticky e
- bind .texwb <ButtonRelease> {+
- set ::vars(selected_scheme) "scheme-custom"; update_vars; show_stats}
- bind .texwb <Return> {+
- set ::vars(selected_scheme) "scheme-custom"; update_vars; show_stats}
- bind .texwb <space> {+
- set ::vars(selected_scheme) "scheme-custom"; update_vars; show_stats}
-
} else {
if $::advanced {
# instopt_adjustpath, unix edition: symlinks