diff options
| author | Karl Berry <karl@freefriends.org> | 2009-05-30 23:54:32 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2009-05-30 23:54:32 +0000 |
| commit | 2698619c97b769c39f43a34f14d19cbfcb632047 (patch) | |
| tree | 47ea7765bfef35c2abe7a671a72ff7cf960f9a11 /Master | |
| parent | 6de7720975e86179f9fb95b25d593c50bdf7f563 (diff) | |
(parse_line): remove trailing whitespace.
git-svn-id: svn://tug.org/texlive/trunk@13538 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 1 |
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 |