Mercurial > emacs
changeset 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 | 4dbdccc0a028 |
| children | 55e5e3d0a166 |
| files | lisp/register.el |
| diffstat | 1 files changed, 16 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/register.el Mon Jun 30 19:39:22 2008 +0000 +++ b/lisp/register.el Mon Jun 30 19:39:57 2008 +0000 @@ -28,6 +28,22 @@ ;; pieces of buffer state to named variables. The entry points are ;; documented in the Emacs user's manual. +;;; Global key bindings + +;;;###autoload (define-key ctl-x-r-map "\C-@" 'point-to-register) +;;;###autoload (define-key ctl-x-r-map [?\C-\ ] 'point-to-register) +;;;###autoload (define-key ctl-x-r-map " " 'point-to-register) +;;;###autoload (define-key ctl-x-r-map "j" 'jump-to-register) +;;;###autoload (define-key ctl-x-r-map "s" 'copy-to-register) +;;;###autoload (define-key ctl-x-r-map "x" 'copy-to-register) +;;;###autoload (define-key ctl-x-r-map "i" 'insert-register) +;;;###autoload (define-key ctl-x-r-map "g" 'insert-register) +;;;###autoload (define-key ctl-x-r-map "r" 'copy-rectangle-to-register) +;;;###autoload (define-key ctl-x-r-map "n" 'number-to-register) +;;;###autoload (define-key ctl-x-r-map "+" 'increment-register) +;;;###autoload (define-key ctl-x-r-map "w" 'window-configuration-to-register) +;;;###autoload (define-key ctl-x-r-map "f" 'frame-configuration-to-register) + ;;; Code: (defvar register-alist nil