Mercurial > emacs
changeset 5103:40b068fb4c37
(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.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 22 Nov 1993 00:41:35 +0000 |
| parents | e035ea595cf6 |
| children | bcf4b8ed1c60 |
| files | lisp/emacs-lisp/lisp-mode.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- 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"))