git.shiar.nl
/
sheet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
bd6167b
)
digraphs: mkdigraphlist: escape vim mnemonics
author
Mischa POSLAWSKY
<perl@shiar.org>
Sun, 22 Feb 2015 15:16:20 +0000
(16:16 +0100)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Tue, 9 Jun 2015 03:43:42 +0000
(
05:43
+0200)
Unlike RFC 1345, Vim extensions such as /\ are not restricted to string-safe
characters.
tools/mkdigraphlist
patch
|
blob
|
history
diff --git
a/tools/mkdigraphlist
b/tools/mkdigraphlist
index 2e6c9191f46414ee7533efa6d97796b846db2783..ecd825f0d653cc8c7fd32bd90bfc45ee970f60b5 100755
(executable)
--- a/
tools/mkdigraphlist
+++ b/
tools/mkdigraphlist
@@
-30,7
+30,7
@@
printf '(map {$_=>0} qw{%s}),'."\n", join(' ',
grep { !defined $di->{$_} }
map { substr($_, 1, 1).substr($_, 0, 1) } sort keys %{$di}
);
-printf "q{%s}=>[%s],\n",
$_
, join(',',
+printf "q{%s}=>[%s],\n",
s/(?=[\\}])/\\/gr
, join(',',
ord $di->{$_}, # original code point
map {"'$_'"}
$uninfo->{ $di->{$_} }->[1], # name