From: Dan Nicolaescu <dann@ics.uci.edu>
Date: Sun, 20 Sep 2009 18:22:37 +0000 (+0000)
Subject: (ctl-x-r-map): Define the keys here instead of using autoload.
X-Git-Tag: emacs-pretest-23.1.90~1216
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=09c0132341493612361442371f4e1019883345c7;p=emacs.git

(ctl-x-r-map): Define the keys here instead of using autoload.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 16eea2af93e..9efe3f36197 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2009-09-20  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* register.el (ctl-x-r-map): Define the keys here instead of using autoload. 
+
 2009-09-20  Thierry Volpiatto  <thierry.volpiatto@gmail.com>
 
 	* bookmark.el (bookmark-write-file): Avoid calling `pp' with large
diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el
index 6d5126ee150..f2dea83b624 100644
--- a/lisp/ldefs-boot.el
+++ b/lisp/ldefs-boot.el
@@ -23228,24 +23228,6 @@ This means the number of non-shy regexp grouping constructs
 
 \(fn REGEXP)" nil nil)
 
-;;;***
-
-;;;### (autoloads nil "register" "register.el" (18961 38375))
-;;; Generated autoloads from register.el
- (define-key ctl-x-r-map "\C-@" 'point-to-register)
- (define-key ctl-x-r-map [?\C-\ ] 'point-to-register)
- (define-key ctl-x-r-map " " 'point-to-register)
- (define-key ctl-x-r-map "j" 'jump-to-register)
- (define-key ctl-x-r-map "s" 'copy-to-register)
- (define-key ctl-x-r-map "x" 'copy-to-register)
- (define-key ctl-x-r-map "i" 'insert-register)
- (define-key ctl-x-r-map "g" 'insert-register)
- (define-key ctl-x-r-map "r" 'copy-rectangle-to-register)
- (define-key ctl-x-r-map "n" 'number-to-register)
- (define-key ctl-x-r-map "+" 'increment-register)
- (define-key ctl-x-r-map "w" 'window-configuration-to-register)
- (define-key ctl-x-r-map "f" 'frame-configuration-to-register)
-
 ;;;***
 
 ;;;### (autoloads (remember-diary-extract-entries remember-clipboard
diff --git a/lisp/register.el b/lisp/register.el
index a5e1cff2da4..4144bba7d0b 100644
--- a/lisp/register.el
+++ b/lisp/register.el
@@ -30,19 +30,19 @@
 
 ;;; 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)
+(define-key ctl-x-r-map "\C-@" 'point-to-register)
+(define-key ctl-x-r-map [?\C-\ ] 'point-to-register)
+(define-key ctl-x-r-map " " 'point-to-register)
+(define-key ctl-x-r-map "j" 'jump-to-register)
+(define-key ctl-x-r-map "s" 'copy-to-register)
+(define-key ctl-x-r-map "x" 'copy-to-register)
+(define-key ctl-x-r-map "i" 'insert-register)
+(define-key ctl-x-r-map "g" 'insert-register)
+(define-key ctl-x-r-map "r" 'copy-rectangle-to-register)
+(define-key ctl-x-r-map "n" 'number-to-register)
+(define-key ctl-x-r-map "+" 'increment-register)
+(define-key ctl-x-r-map "w" 'window-configuration-to-register)
+(define-key ctl-x-r-map "f" 'frame-configuration-to-register)
 
 ;;; Code: