From 922f458bb1098d6f4b8150c828126bd9cd400663 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sun, 31 Jul 2022 22:04:01 +0000 Subject: (from_file): remove trailing in-line comments, that is \s+#.*$ (at present there aren't any in *.tlpsrc, so this should have no effect). git-svn-id: svn://tug.org/texlive/trunk@64018 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLPSRC.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'Master') diff --git a/Master/tlpkg/TeXLive/TLPSRC.pm b/Master/tlpkg/TeXLive/TLPSRC.pm index 0a1146386ac..f6f88d12172 100644 --- a/Master/tlpkg/TeXLive/TLPSRC.pm +++ b/Master/tlpkg/TeXLive/TLPSRC.pm @@ -131,7 +131,10 @@ sub from_file { $line =~ /^ / && die "$srcfile:$lineno: non-continuation indentation not allowed: `$line'"; # - # remove trailing white space. + # remove trailing comment (whitespace preceding #). + $line =~ s/\s+#.*$//; + # + # remove other trailing white space. $line =~ s/\s+$//; # expand tlpvars while reading in (except in descriptions). -- cgit v1.2.3