From 0c3894c0dc76c5fb679548334247cb1ea957ccec Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 8 Dec 2021 22:35:23 +0000 Subject: terser warning msg, with $0 git-svn-id: svn://tug.org/texlive/trunk@61253 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLConfFile.pm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'Master/tlpkg/TeXLive') diff --git a/Master/tlpkg/TeXLive/TLConfFile.pm b/Master/tlpkg/TeXLive/TLConfFile.pm index 9b9e3b8ad1d..8f3448d3dd3 100644 --- a/Master/tlpkg/TeXLive/TLConfFile.pm +++ b/Master/tlpkg/TeXLive/TLConfFile.pm @@ -473,11 +473,10 @@ sub parse_config_file { # if we are still here, that means we cannot evaluate the config file # give a BIG FAT WARNING but save the line as comment and continue # anyway - warn("WARNING WARNING WARNING\n"); - warn("Cannot parse config file $file ($cc, $sep)\n"); - warn("The following line (l.$l) seems to be wrong:\n"); + my $userlineno = $l + 1; # one-based + warn("$0: WARNING: Cannot parse tlmgr config file ($cc, $sep)\n"); + warn("$0: $file:$userlineno: treating this line as comment:\n"); warn(">>> $data[$l]\n"); - warn("We will treat this line as a comment!\n"); $config{$l}{'type'} = 'comment'; $config{$l}{'value'} = $data[$l]; } -- cgit v1.2.3