# HG changeset patch
# User michaels
# Date 1140964148 0
# Node ID 830872ebe09632caacbbcdbb69b73fab22d89f05
# Parent  020e42010015bb91c7487c7c7f839bc9fa15151c
[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.

diff -r 020e42010015 -r 830872ebe096 lisp/ChangeLog
--- 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.
diff -r 020e42010015 -r 830872ebe096 lisp/lisp-mode.el
--- 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.