mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-24 07:20:37 +00:00
(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.
This commit is contained in:
parent
2f5d268106
commit
ef7485ce20
@ -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"))
|
||||
|
Loading…
Reference in New Issue
Block a user