diff options
| author | Norbert Preining <preining@logic.at> | 2008-04-16 06:35:59 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-04-16 06:35:59 +0000 |
| commit | 5764c6b8138f790bfcd662a5fe197d7fceaaf82a (patch) | |
| tree | 35777ffd6514f56e0b007fbaf390712ae3767d47 /Master/tlpkg | |
| parent | 6b695c4f2966653d70f5f5c6de33e30c176225d7 (diff) | |
compile pattern only once, spare some time
git-svn-id: svn://tug.org/texlive/trunk@7441 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index 9576f7eb24f..2754ebba507 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -109,7 +109,7 @@ sub from_fh { } $lastcmd = "longdesc"; next; - } elsif ($line =~ /^category\s+$CategoriesRegexp$/) { + } elsif ($line =~ /^category\s+$CategoriesRegexp$/o) { $self->{'category'} = "$1"; $lastcmd = "category"; next; |