diff options
Diffstat (limited to 'aux/emcollect')
-rwxr-xr-x | aux/emcollect | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/aux/emcollect b/aux/emcollect deleted file mode 100755 index 55434ac..0000000 --- a/aux/emcollect +++ /dev/null @@ -1,18 +0,0 @@ -#!/bin/awk -f - -# aux/emcollect -- collect hyperlink references in em source - -function collect(line) { - left = $0 - right = $0 - sub("^ \\[", "", left) - sub("\\].*$", "", left) - sub("^ \\[[0-9a-z]\\]+ ", "", right) - printf "%s=%s\n", left, right -} - -BEGIN { expectblock = 1 } - -/^$/ { expectblock = 1; getline } -expectblock && /^ \[[0-9a-z]\]+ / { block = "nl"; expectblock = 0 } -block = "nl" && /^ \[[0-9a-z]\]+ [^ ]+$/ { collect($0); next } |