# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 753928895 0
# Node ID 40b068fb4c378a8de183de4ae3848a2408c7b263
# Parent  e035ea595cf64fc42c655aa437b8f4305863cc0b
(lisp-eval-defun): Renamed from lisp-send-defun.
(lisp-mode-map): Use new name lisp-eval-defun.
Move run-lisp to C-x C-z.

diff -r e035ea595cf6 -r 40b068fb4c37 lisp/emacs-lisp/lisp-mode.el
--- a/lisp/emacs-lisp/lisp-mode.el	Mon Nov 22 00:20:36 1993 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Mon Nov 22 00:41:35 1993 +0000
@@ -151,8 +151,8 @@
     ()
   (setq lisp-mode-map
 	(nconc (make-sparse-keymap) shared-lisp-mode-map))
-  (define-key lisp-mode-map "\e\C-x" 'lisp-send-defun)
-  (define-key lisp-mode-map "\C-c\C-l" 'run-lisp))
+  (define-key lisp-mode-map "\e\C-x" 'lisp-eval-defun)
+  (define-key lisp-mode-map "\C-c\C-z" 'run-lisp))
 
 (defun lisp-mode ()
   "Major mode for editing Lisp code for Lisps other than GNU Emacs Lisp.
@@ -175,7 +175,7 @@
   (run-hooks 'lisp-mode-hook))
 
 ;; This will do unless shell.el is loaded.
-(defun lisp-send-defun nil
+(defun lisp-eval-defun nil
   "Send the current defun to the Lisp process made by \\[run-lisp]."
   (interactive)
   (error "Process lisp does not exist"))