digraphs: parse vim :digraphs to indicate extensions

[sheet.git] / tools / mkdigraphs-vim

diff --git a/tools/mkdigraphs-vim b/tools/mkdigraphs-vim
new file mode 100755 (executable)
index 0000000..d47a733
--- /dev/null
+++ b/tools/mkdigraphs-vim
@@ -0,0 +1,10 @@
+#!/bin/sh
+vim -e -cdigraphs -cq | perl -CSD -nE '
+       BEGIN {
+               say "+{";
+       }
+               say "q{$1} => $3," while /\G(\S\S) (.[^ ]*) +([0-9]+)\s+/g;
+       END {
+               say "}";
+       }
+'