changeset 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 020e42010015
children 79d41cfd8e6b
files lisp/ChangeLog lisp/lisp-mode.el
diffstat 2 files changed, 6 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sun Feb 26 14:28:38 2006 +0000
+++ b/lisp/ChangeLog	Sun Feb 26 14:29:08 2006 +0000
@@ -1,3 +1,9 @@
+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.
+
 2006-02-26  Stephen J. Turnbull  <stephen@xemacs.org>
 
 	* XEmacs 21.5.25 "eggplant" is released.
--- 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.