diff options
| author | Hans Hagen <pragma@wxs.nl> | 2013-02-05 13:35:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2013-02-05 13:35:00 +0100 |
| commit | baae751ef69bcc2c205ec969dbd5788fe0ac26e8 (patch) | |
| tree | 48d78cbe66786b60e549f4e21be3bcf2b47262aa /tex/context/base/util-mrg.lua | |
| parent | e2f3737b9e45d1cf4d553b3f6cce71d5428bfe51 (diff) | |
| download | context-baae751ef69bcc2c205ec969dbd5788fe0ac26e8.tar.gz | |
beta 2013.02.05 13:35
Diffstat (limited to 'tex/context/base/util-mrg.lua')
| -rw-r--r-- | tex/context/base/util-mrg.lua | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tex/context/base/util-mrg.lua b/tex/context/base/util-mrg.lua index cdac10ac1..276531d79 100644 --- a/tex/context/base/util-mrg.lua +++ b/tex/context/base/util-mrg.lua @@ -120,6 +120,10 @@ local compact = Cs ( ( local strip = Cs((emptyline^2/"\n" + 1)^0) local stripreturn = Cs((1-P("return") * space^1 * P(1-space-eol)^1 * (space+eol)^0 * P(-1))^1) +function merger.compact(data) + return lpegmatch(strip,lpegmatch(compact,data)) +end + local function self_compact(data) local delta = 0 if merger.strip_comment then |