texlive[51678] Master/tlpkg/tltcl/gui_err.tcl: gui_err.tcl removed;

commits+siepo at tug.org commits+siepo at tug.org
Fri Jul 19 22:24:51 CEST 2019


Revision: 51678
          http://tug.org/svn/texlive?view=revision&revision=51678
Author:   siepo
Date:     2019-07-19 22:24:51 +0200 (Fri, 19 Jul 2019)
Log Message:
-----------
gui_err.tcl removed; made redundant by texmf-dist/scripts/texlive/tl-errmess.vbs

Removed Paths:
-------------
    trunk/Master/tlpkg/tltcl/gui_err.tcl

Deleted: trunk/Master/tlpkg/tltcl/gui_err.tcl
===================================================================
--- trunk/Master/tlpkg/tltcl/gui_err.tcl	2019-07-19 20:10:10 UTC (rev 51677)
+++ trunk/Master/tlpkg/tltcl/gui_err.tcl	2019-07-19 20:24:51 UTC (rev 51678)
@@ -1,13 +0,0 @@
-#!/usr/bin/env wish
-
-# fonts
-# no bold text for messages; `userDefault' indicates priority
-catch {option add *Dialog.msg.font TkDefaultFont userDefault}
-# width of '0', as a rough estimate of average character width
-set ::cw 8
-catch {set ::cw [font measure TkDefaultFont "0"]}
-
-wm title . "Warning/Error"
-label .l -text $::env(RUNSCRIPT_ERROR_MESSAGE) -wraplength [expr {60*$::cw}]
-pack .l -padx 6 -pady 3
-pack [button .q -text "Ok" -command exit] -ipadx 3 -pady 3



More information about the tex-live-commits mailing list