From ef7485ce20f978121a34280727185c58941517b7 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 22 Nov 1993 00:41:35 +0000 Subject: (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. --- lisp/emacs-lisp/lisp-mode.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/emacs-lisp/lisp-mode.el') diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index f060563f175..590de3d0523 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -151,8 +151,8 @@ All commands in `shared-lisp-mode-map' are inherited by this map.") () (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 @@ if that value is non-nil." (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")) -- cgit v1.2.3