Mercurial > hg > xemacs-beta

comparison lisp/mule/mule-init.el @ 104:cf808b4c4290 r20-1b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b4
author cvs
date Mon, 13 Aug 2007 09:16:51 +0200
parents 6a378aca36af
children fe104dbd9147
comparison
equal deleted inserted replaced
103:30eda07fe280 104:cf808b4c4290
46 (sort (language-environment-list) 'string-lessp)) 46 (sort (language-environment-list) 'string-lessp))
47 47
48 (defvar mule-keymap (make-sparse-keymap) "Keymap for Mule specific commands.") 48 (defvar mule-keymap (make-sparse-keymap) "Keymap for Mule specific commands.")
49 (fset 'mule-prefix mule-keymap) 49 (fset 'mule-prefix mule-keymap)
50 50
51 (define-key ctl-x-map "\C-k" 'mule-prefix) 51 (define-key ctl-x-map "\C-n" 'mule-prefix)
52 52
53 ;; Alternative key definitions 53 ;; Alternative key definitions
54 ;; Original mapping will be altered by set-keyboard-coding-system. 54 ;; Original mapping will be altered by set-keyboard-coding-system.
55 (define-key global-map [(meta \#)] 'ispell-word) ;originally "$" 55 (define-key global-map [(meta \#)] 'ispell-word) ;originally "$"
56 ;; (define-key global-map [(meta {)] 'insert-parentheses) ;originally "(" 56 ;; (define-key global-map [(meta {)] 'insert-parentheses) ;originally "("