Mercurial > emacs

annotate admin/charsets/kuten.awk @ 89497:76c9d23be7a1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Doc fixes. (auto-compose-chars): Use functionp, not fboundp.
author Dave Love <fx@gnu.org>
date Thu, 11 Sep 2003 09:24:56 +0000
parents 375f2633d815
children e0e4e6a0599f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
88123
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
1 /^[0-9]/ {
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
2 ku=substr($1, 3, 2) + 32;
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
3 ten=substr($1, 5, 2) + 32;
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
4 printf "0x%02X%02X %s\n", ku, ten, $2;
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
5 }