Mercurial > hg > xemacs-beta

comparison lisp/x-compose.el @ 3459:8f07ad760f0f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2006-06-18 21:43:38 by aidan] Provide sharp S as diaeresis + s in the compose mapping.
author aidan
date Sun, 18 Jun 2006 21:43:39 +0000
parents a25c824ed558
children e34711681f30
comparison
equal deleted inserted replaced
3458:6139607b3fbf 3459:8f07ad760f0f
229 (define-key compose-diaeresis-map [U] [(?\334)]) 229 (define-key compose-diaeresis-map [U] [(?\334)])
230 (define-key compose-diaeresis-map [a] [(?\344)]) 230 (define-key compose-diaeresis-map [a] [(?\344)])
231 (define-key compose-diaeresis-map [e] [(?\353)]) 231 (define-key compose-diaeresis-map [e] [(?\353)])
232 (define-key compose-diaeresis-map [i] [(?\357)]) 232 (define-key compose-diaeresis-map [i] [(?\357)])
233 (define-key compose-diaeresis-map [o] [(?\366)]) 233 (define-key compose-diaeresis-map [o] [(?\366)])
234 ;; Not strictly a diaeresis, but close enough for government work.
235 (define-key compose-diaeresis-map [s] [(?\337)])
234 (define-key compose-diaeresis-map [u] [(?\374)]) 236 (define-key compose-diaeresis-map [u] [(?\374)])
235 (define-key compose-diaeresis-map [y] [(?\377)]) 237 (define-key compose-diaeresis-map [y] [(?\377)])
236 238
237 (define-key compose-circumflex-map [space] "^") 239 (define-key compose-circumflex-map [space] "^")
238 (define-key compose-circumflex-map [?/] "|") 240 (define-key compose-circumflex-map [?/] "|")