Mercurial > emacs
comparison lisp/register.el @ 96441:40356b7a4808
Bind global keys to ctl-x-r-map in autoload cookies.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Mon, 30 Jun 2008 19:39:57 +0000 |
parents | ee5932bf781d |
children | a9dc0e7c3f2b |
comparison
equal
deleted
inserted
replaced
96440:4dbdccc0a028 | 96441:40356b7a4808 |
---|---|
25 | 25 |
26 ;; This package of functions emulates and somewhat extends the venerable | 26 ;; This package of functions emulates and somewhat extends the venerable |
27 ;; TECO's `register' feature, which permits you to save various useful | 27 ;; TECO's `register' feature, which permits you to save various useful |
28 ;; pieces of buffer state to named variables. The entry points are | 28 ;; pieces of buffer state to named variables. The entry points are |
29 ;; documented in the Emacs user's manual. | 29 ;; documented in the Emacs user's manual. |
30 | |
31 ;;; Global key bindings | |
32 | |
33 ;;;###autoload (define-key ctl-x-r-map "\C-@" 'point-to-register) | |
34 ;;;###autoload (define-key ctl-x-r-map [?\C-\ ] 'point-to-register) | |
35 ;;;###autoload (define-key ctl-x-r-map " " 'point-to-register) | |
36 ;;;###autoload (define-key ctl-x-r-map "j" 'jump-to-register) | |
37 ;;;###autoload (define-key ctl-x-r-map "s" 'copy-to-register) | |
38 ;;;###autoload (define-key ctl-x-r-map "x" 'copy-to-register) | |
39 ;;;###autoload (define-key ctl-x-r-map "i" 'insert-register) | |
40 ;;;###autoload (define-key ctl-x-r-map "g" 'insert-register) | |
41 ;;;###autoload (define-key ctl-x-r-map "r" 'copy-rectangle-to-register) | |
42 ;;;###autoload (define-key ctl-x-r-map "n" 'number-to-register) | |
43 ;;;###autoload (define-key ctl-x-r-map "+" 'increment-register) | |
44 ;;;###autoload (define-key ctl-x-r-map "w" 'window-configuration-to-register) | |
45 ;;;###autoload (define-key ctl-x-r-map "f" 'frame-configuration-to-register) | |
30 | 46 |
31 ;;; Code: | 47 ;;; Code: |
32 | 48 |
33 (defvar register-alist nil | 49 (defvar register-alist nil |
34 "Alist of elements (NAME . CONTENTS), one for each Emacs register. | 50 "Alist of elements (NAME . CONTENTS), one for each Emacs register. |