Mercurial > hg > xemacs-beta
diff lisp/lisp-mode.el @ 3261:830872ebe096
[xemacs-hg @ 2006-02-26 14:29:08 by michaels]
2006-02-26 Mike Sperber <mike@xemacs.org>
* lisp-mode.el (lisp-send-defun): Remove this function; the
definition here didn't do anything---once upon a time, it may have
gotten overwritten by some code that has evaporated since then.
author | michaels |
---|---|
date | Sun, 26 Feb 2006 14:29:08 +0000 |
parents | ce294639d321 |
children | 8f1ee2d15784 |
line wrap: on
line diff
--- a/lisp/lisp-mode.el Sun Feb 26 14:28:38 2006 +0000 +++ b/lisp/lisp-mode.el Sun Feb 26 14:29:08 2006 +0000 @@ -340,7 +340,6 @@ (setq lisp-mode-map (make-sparse-keymap)) (set-keymap-name lisp-mode-map 'lisp-mode-map) (set-keymap-parents lisp-mode-map (list shared-lisp-mode-map)) - (define-key lisp-mode-map "\e\C-x" 'lisp-send-defun) ;; gag, no. use ilisp. -jwz ;; (define-key lisp-mode-map "\C-c\C-z" 'run-lisp) ) @@ -365,13 +364,6 @@ (set-syntax-table lisp-mode-syntax-table) (run-hooks 'lisp-mode-hook)) -;; This will do unless shell.el is loaded. -;; XEmacs change -(defun lisp-send-defun () - "Send the current defun to the Lisp process made by \\[run-lisp]." - (interactive) - (error "Process lisp does not exist")) - ;; XEmacs change: emacs-lisp-mode-map is a more appropriate parent. (defvar lisp-interaction-mode-map () "Keymap for Lisp Interaction mode.