Mercurial > hg > xemacs-beta

comparison lisp/prim/keydefs.el @ 195:a2f645c6b9f8 r20-3b24

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b24
author cvs
date Mon, 13 Aug 2007 09:59:05 +0200
parents 3bb7ccffb0c0
children
comparison
equal deleted inserted replaced
194:2947057885e5 195:a2f645c6b9f8
139 139
140 ;; New FSF19 bindings: C-x 5 as prefix for window commands 140 ;; New FSF19 bindings: C-x 5 as prefix for window commands
141 (define-key global-map "\C-x52" 'make-frame) 141 (define-key global-map "\C-x52" 'make-frame)
142 (define-key global-map "\C-x50" 'delete-frame) 142 (define-key global-map "\C-x50" 'delete-frame)
143 (define-key global-map "\C-x5o" 'other-frame) 143 (define-key global-map "\C-x5o" 'other-frame)
144 ;; XEmacs addition:
145 (define-key global-map "\C-x5m" 'mail-other-frame)
146 144
147 ;; FSFmacs help.el 145 ;; FSFmacs help.el
148 146
149 (define-key global-map (vector help-char) 'help-command) 147 (define-key global-map (vector help-char) 'help-command)
150 (define-key global-map 'help 'help-command) 148 (define-key global-map 'help 'help-command)
460 ; autoloaded 458 ; autoloaded
461 ;(define-key global-map "\C-x4d" 'dired-other-window) 459 ;(define-key global-map "\C-x4d" 'dired-other-window)
462 460
463 (define-key global-map "\M-$" 'ispell-word) 461 (define-key global-map "\M-$" 'ispell-word)
464 462
465 (define-key global-map "\C-x4m" 'mail-other-window) 463 (define-key global-map "\C-xm" 'compose-mail)
466 464 (define-key global-map "\C-x4m" 'compose-mail-other-window)
467 (define-key global-map "\C-xm" 'mail) 465 (define-key global-map "\C-x5m" 'compose-mail-other-frame)
468 466
469 (define-key global-map "\M-." 'find-tag) 467 (define-key global-map "\M-." 'find-tag)
470 468
471 (define-key global-map "\C-x4." 'find-tag-other-window) 469 (define-key global-map "\C-x4." 'find-tag-other-window)
472 470