diff options
author | Karl Berry <karl@freefriends.org> | 2019-01-28 22:47:02 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-01-28 22:47:02 +0000 |
commit | ce06e970533ac446a5229a6e05dcbc305ef16075 (patch) | |
tree | 502f080f309d849aeb23b7a91a1d5ecd9b388305 /Master/tlpkg/TeXLive/TLUtils.pm | |
parent | 708ca6d80de4ace083376877e5ee9160a9f9001f (diff) |
consistently use $0 on tldie msgs; precede with newline
git-svn-id: svn://tug.org/texlive/trunk@49855 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLUtils.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 3f6746c36e0..cce5af67328 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -1,6 +1,6 @@ # $Id$ # TeXLive::TLUtils.pm - the inevitable utilities for TeX Live. -# Copyright 2007-2018 Norbert Preining, Reinhard Kotucha +# Copyright 2007-2019 Norbert Preining, Reinhard Kotucha # This file is licensed under the GNU General Public License version 2 # or any later version. @@ -3476,12 +3476,13 @@ sub tlwarn { =item C<tldie ($str1, $str2, ...)> -Uses C<tlwarn> to issue a warning, then exits with exit code 1. +Uses C<tlwarn> to issue a warning for @_ preceded by a newline, then +exits with exit code 1. =cut sub tldie { - tlwarn(@_); + tlwarn("\n", @_); if ($::gui_mode) { Tk::exit(1); } else { |