summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/scripts
diff options
context:
space:
mode:
authorSiep Kroonenberg <siepo@cybercomm.nl>2021-03-07 20:26:25 +0000
committerSiep Kroonenberg <siepo@cybercomm.nl>2021-03-07 20:26:25 +0000
commitc1e9b951767f43e629b240022f6b22e1dc043252 (patch)
treec26cd092be127627ccb9dfbb9f5c92eb40465b41 /Master/texmf-dist/scripts
parent6c1028332477b498487f3473108a4ff353a51984 (diff)
Some help info added
git-svn-id: svn://tug.org/texlive/trunk@58193 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts')
-rwxr-xr-xMaster/texmf-dist/scripts/tlshell/tlshell.tcl17
1 files changed, 14 insertions, 3 deletions
diff --git a/Master/texmf-dist/scripts/tlshell/tlshell.tcl b/Master/texmf-dist/scripts/tlshell/tlshell.tcl
index c81a713f360..782b492357d 100755
--- a/Master/texmf-dist/scripts/tlshell/tlshell.tcl
+++ b/Master/texmf-dist/scripts/tlshell/tlshell.tcl
@@ -1,6 +1,8 @@
#!/bin/sh
# next line ignored by wish but not by sh \
TK_SILENCE_DEPRECATION=1 exec wish "$0" "$@"
+# The above environment variable is set to suppress
+# a warning message under MacOS Catalina and Big Sur
# Copyright 2017-2021 Siep Kroonenberg
@@ -2269,12 +2271,20 @@ proc run_external {cmd mess} {
}
proc about_cmd {} {
- set msg "\u00a9 2017-2020 Siep Kroonenberg\n\n"
+ set msg "\u00a9 2017-2021 Siep Kroonenberg\n\n"
append msg [__ "GUI interface for TeX Live Manager\nImplemented in Tcl/Tk"]
tk_messageBox -message $msg
}
-proc show_help {} {
+proc tlshell_help {} {
+ set msg \
+ [__ "This TeX Live Manager front-end should be pretty self-explanatory.
+Note that it does not cover the full functionality of tlmgr. Notably, it does not cover user mode or backup and restore.
+Consult the 'Tlmgr Help' menu for full documentation on tlmgr itself."]
+ tk_messageBox -message $msg
+}
+
+proc tlmgr_help {} {
set ::env(NOPERLDOC) 1
long_message [exec tlmgr --help] ok
}
@@ -2432,7 +2442,8 @@ proc populate_main {} {
.mn add cascade -label [__ "Help"] -menu .mn.help -underline 0
menu .mn.help
.mn.help add command -label [__ "About"] -command about_cmd
- .mn.help add command -label [__ "tlmgr help"] -command show_help
+ .mn.help add command -label [__ "TLShell Help"] -command tlshell_help
+ .mn.help add command -label [__ "Tlmgr Help"] -command tlmgr_help
## menu end