summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tltcl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tltcl')
-rw-r--r--Master/tlpkg/tltcl/gui_err.tcl5
1 files changed, 5 insertions, 0 deletions
diff --git a/Master/tlpkg/tltcl/gui_err.tcl b/Master/tlpkg/tltcl/gui_err.tcl
new file mode 100644
index 00000000000..56bea3ea833
--- /dev/null
+++ b/Master/tlpkg/tltcl/gui_err.tcl
@@ -0,0 +1,5 @@
+#!/usr/bin/env wish
+wm title . "Warning/Error"
+pack [label .l -text $::env(RUNSCRIPT_ERROR_MESSAGE) -wraplength 80] \
+ -padx 6 -pady 3
+pack [button .q -text "Ok" -command exit] -ipadx 3 -pady 3