# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1031867546 0
# Node ID 3a43982413a67a10373d490756350f323a99e0b8
# Parent  85021da80289a97bce15ba1c36589061cb09125e
(kmacro-keymap): Changed bindings:
C-x C-k s to kmacro-start-macro, C-x C-k b to kmacro-bind-to-key.

diff -r 85021da80289 -r 3a43982413a6 lisp/kmacro.el
--- a/lisp/kmacro.el	Thu Sep 12 21:49:55 2002 +0000
+++ b/lisp/kmacro.el	Thu Sep 12 21:52:26 2002 +0000
@@ -174,7 +174,7 @@
 
 (defvar kmacro-keymap
   (let ((map (make-sparse-keymap)))
-    (define-key map "\C-s" 'kmacro-start-macro)
+    (define-key map "s"    'kmacro-start-macro)
     (define-key map "\C-k" 'kmacro-end-or-call-macro-repeat)
     (define-key map "\C-e" 'kmacro-edit-macro-repeat)
     (define-key map "\r"   'kmacro-edit-macro)
@@ -190,7 +190,7 @@
     (define-key map "\C-f" 'kmacro-set-format)
     (define-key map "\C-c" 'kmacro-set-counter)
     (define-key map "\C-t" 'kmacro-swap-ring)
-    (define-key map "\C-b" 'kmacro-bind-to-key)
+    (define-key map "b"    'kmacro-bind-to-key)
     (define-key map "\C-d" 'kmacro-delete-ring-head)
     ;; Compatibility bindings
     (define-key map "q"    'kbd-macro-query)