summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/scripts/context/perl
diff options
context:
space:
mode:
authorTaco Hoekwater <taco@elvenkind.com>2008-06-12 10:42:53 +0000
committerTaco Hoekwater <taco@elvenkind.com>2008-06-12 10:42:53 +0000
commit0d01365d53c456d246da0ca1f0b3cd9868f02b35 (patch)
tree01a655c8028e17cfb371456b299c1848fe08c05b /Master/texmf-dist/scripts/context/perl
parent44f3714442da07fdfc36a7f2a8dcd5d4294c5d26 (diff)
ConTeXt release 2008.05.21
git-svn-id: svn://tug.org/texlive/trunk@8691 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts/context/perl')
-rw-r--r--Master/texmf-dist/scripts/context/perl/makempy.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/texmf-dist/scripts/context/perl/makempy.pl b/Master/texmf-dist/scripts/context/perl/makempy.pl
index f263dd4259d..7cba2e1a698 100644
--- a/Master/texmf-dist/scripts/context/perl/makempy.pl
+++ b/Master/texmf-dist/scripts/context/perl/makempy.pl
@@ -289,7 +289,7 @@ sub construct_mpy_file
{ error("unable to open $mpyfile file") }
print MPY "% mpochecksum : $mpochecksum\n" ;
my $copying = my $n = 0 ;
- while (<TMP>)
+ while (<TMP>) # a simple sub is faster
{ if (s/beginfig/begingraphictextfig/o)
{ print MPY $_ ; $copying = 1 ; ++$n }
elsif (s/endfig/endgraphictextfig/o)