summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPOBJ.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-04-16 06:35:59 +0000
committerNorbert Preining <preining@logic.at>2008-04-16 06:35:59 +0000
commit5764c6b8138f790bfcd662a5fe197d7fceaaf82a (patch)
tree35777ffd6514f56e0b007fbaf390712ae3767d47 /Master/tlpkg/TeXLive/TLPOBJ.pm
parent6b695c4f2966653d70f5f5c6de33e30c176225d7 (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/TeXLive/TLPOBJ.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPOBJ.pm2
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;