summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2009-05-30 23:54:32 +0000
committerKarl Berry <karl@freefriends.org>2009-05-30 23:54:32 +0000
commit2698619c97b769c39f43a34f14d19cbfcb632047 (patch)
tree47ea7765bfef35c2abe7a671a72ff7cf960f9a11
parent6de7720975e86179f9fb95b25d593c50bdf7f563 (diff)
(parse_line): remove trailing whitespace.
git-svn-id: svn://tug.org/texlive/trunk@13538 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 49eda5b0510..08f6ceab3f9 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -2478,6 +2478,7 @@ sub parse_line {
no warnings 'uninitialized'; # we will be testing undef strings
+ $line =~ s/\s+$//; # kill trailing whitespace
while (length($line)) {
$line =~ s/^(["']) # a $quote
((?:\\.|(?!\1)[^\\])*) # and $quoted text