summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/scripts
diff options
context:
space:
mode:
authorSiep Kroonenberg <siepo@cybercomm.nl>2024-03-05 20:15:14 +0000
committerSiep Kroonenberg <siepo@cybercomm.nl>2024-03-05 20:15:14 +0000
commit6ba0d43c58eba77decc97e81b5e6f1c60e998ba3 (patch)
treedd82419995f8daa54c0d56f7ebcb52e5723e89d8 /Master/texmf-dist/scripts
parent2e874ed2ceae916db3198772d9be793f852a48a5 (diff)
Tlshell: added bug reporting to package popup
git-svn-id: svn://tug.org/texlive/trunk@70419 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts')
-rwxr-xr-xMaster/texmf-dist/scripts/tlshell/tlshell.tcl5
1 files changed, 4 insertions, 1 deletions
diff --git a/Master/texmf-dist/scripts/tlshell/tlshell.tcl b/Master/texmf-dist/scripts/tlshell/tlshell.tcl
index 02bd6a2bd40..5d34e2197cc 100755
--- a/Master/texmf-dist/scripts/tlshell/tlshell.tcl
+++ b/Master/texmf-dist/scripts/tlshell/tlshell.tcl
@@ -1,6 +1,6 @@
#!/usr/bin/env wish
-# Copyright 2017-2023 Siep Kroonenberg
+# Copyright 2017-2024 Siep Kroonenberg
# This file is licensed under the GNU General Public License version 2
# or any later version.
@@ -2215,6 +2215,9 @@ proc do_package_popup_menu {x y X Y} {
remove_pkgs "focus"
}
}
+ .pkg_popup add command -label [__ "Reporting bugs"] -command {
+ run_cmd "bug [.pkglist focus]" 1; vwait ::done_waiting
+ }
.pkg_popup post [expr {$X - 2}] [expr {$Y - 2}]
focus .pkg_popup
} ; # do_package_popup_menu