From: yamaoka <yamaoka>
Date: Sat, 3 Oct 1998 07:41:12 +0000 (+0000)
Subject: 	* lisp/message.el (message-mode-map): Use `define-key' instead of
X-Git-Tag: pgnus-ichikawa-199811302358~186
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d8b9805b5ac3cfd4efaa1bd5fac609591e3e924c;p=elisp%2Fgnus.git-

	* lisp/message.el (message-mode-map): Use `define-key' instead of
	`substitute-key-definition' for `message-kill-buffer'.
---

diff --git a/lisp/message.el b/lisp/message.el
index 22f767a..eb37072 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -1386,8 +1386,7 @@ Point is left at the beginning of the narrowed-to region."
 
   (define-key message-mode-map "\t" 'message-tab)
 
-  (substitute-key-definition 'kill-buffer 'message-kill-buffer
-			     message-mode-map))
+  (define-key message-mode-map "\C-xk" 'message-kill-buffer))
 
 (easy-menu-define
  message-mode-menu message-mode-map "Message Menu."