Mercurial > hg > xemacs-beta

comparison lisp/keydefs.el @ 462:0784d089fdc9 r21-2-46

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-46
author cvs
date Mon, 13 Aug 2007 11:44:37 +0200
parents abe6d1db359e
children 54fa1a5c2d12
comparison
equal deleted inserted replaced
461:120ed4009e51 462:0784d089fdc9
236 (define-key global-map '(meta -) 'negative-argument) 236 (define-key global-map '(meta -) 'negative-argument)
237 (define-key global-map '(control -) 'negative-argument) 237 (define-key global-map '(control -) 'negative-argument)
238 (define-key global-map '(control meta -) 'negative-argument) 238 (define-key global-map '(control meta -) 'negative-argument)
239 239
240 (define-key global-map "\C-k" 'kill-line) 240 (define-key global-map "\C-k" 'kill-line)
241 (define-key global-map '(control K) 'historical-kill-line) 241 ;will change like this in 21.5.
242 ;(define-key global-map "\M-k" 'kill-entire-line)
242 (define-key global-map "\C-w" 'kill-region) 243 (define-key global-map "\C-w" 'kill-region)
243 (define-key global-map "\M-w" 'kill-ring-save) 244 (define-key global-map "\M-w" 'kill-ring-save)
244 (define-key global-map "\M-\C-w" 'append-next-kill) 245 (define-key global-map "\M-\C-w" 'append-next-kill)
245 (define-key global-map "\C-y" 'yank) 246 (define-key global-map "\C-y" 'yank)
246 (define-key global-map "\M-y" 'yank-pop) 247 (define-key global-map "\M-y" 'yank-pop)
350 (define-key global-map "\M-}" 'forward-paragraph) 351 (define-key global-map "\M-}" 'forward-paragraph)
351 (define-key global-map "\M-h" 'mark-paragraph) 352 (define-key global-map "\M-h" 'mark-paragraph)
352 (define-key global-map "\M-a" 'backward-sentence) 353 (define-key global-map "\M-a" 'backward-sentence)
353 (define-key global-map "\M-e" 'forward-sentence) 354 (define-key global-map "\M-e" 'forward-sentence)
354 (define-key global-map "\M-k" 'kill-sentence) 355 (define-key global-map "\M-k" 'kill-sentence)
356 ;will change like this in 21.5.
357 ;(define-key global-map "\M-K" 'kill-sentence)
355 ;;(define-key global-map "\C-x\177" 'backward-kill-sentence) 358 ;;(define-key global-map "\C-x\177" 'backward-kill-sentence)
356 359
357 (define-key global-map "\C-x[" 'backward-page) 360 (define-key global-map "\C-x[" 'backward-page)
358 (define-key global-map "\C-x]" 'forward-page) 361 (define-key global-map "\C-x]" 'forward-page)
359 (define-key global-map "\C-x\C-p" 'mark-page) 362 (define-key global-map "\C-x\C-p" 'mark-page)