Mercurial > hg > xemacs-beta

comparison lisp/keydefs.el @ 223:2c611d1463a6 r20-4b10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b10
author cvs
date Mon, 13 Aug 2007 10:10:54 +0200
parents 41ff10fd062f
children 0e522484dd2a
comparison
equal deleted inserted replaced
222:aae4c8b01452 223:2c611d1463a6
211 ;; by accident? 211 ;; by accident?
212 ;; (put 'eval-expression 'disabled t) 212 ;; (put 'eval-expression 'disabled t)
213 ;; Changed from C-x ESC so that function keys work following C-x. 213 ;; Changed from C-x ESC so that function keys work following C-x.
214 (define-key global-map "\C-x\e\e" 'repeat-complex-command) 214 (define-key global-map "\C-x\e\e" 'repeat-complex-command)
215 ;(define-key global-map "\C-x\e" 'repeat-complex-command) 215 ;(define-key global-map "\C-x\e" 'repeat-complex-command)
216 ;; From Emacs 20.
217 (define-key global-map "\C-x\M-:" 'repeat-complex-command)
216 (define-key global-map "\C-xu" 'advertised-undo) 218 (define-key global-map "\C-xu" 'advertised-undo)
217 ;; Many people are used to typing C-/ on X terminals and getting C-_. 219 ;; Many people are used to typing C-/ on X terminals and getting C-_.
218 (define-key global-map '(control /) 'undo) 220 (define-key global-map '(control /) 'undo)
219 (define-key global-map "\C-_" 'undo) 221 (define-key global-map "\C-_" 'undo)
220 (define-key global-map "\M-!" 'shell-command) 222 (define-key global-map "\M-!" 'shell-command)