From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 14 Apr 2004 18:59:10 +0000 (+0000)
Subject: (python-mouse-2-command, python-RET-command): Remove unused functions.
X-Git-Tag: ttn-vms-21-2-B4~6825
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1e328a982ce5d4409e5aa6f0f13b132d9c5f10b8;p=emacs.git

(python-mouse-2-command, python-RET-command): Remove unused functions.
---

diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index 36dc832347c..5ca1277a994 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -1129,33 +1129,6 @@ def _emacs_args (name):  # get arglist of name for eldoc &c
 print '_emacs_ok'"))
   (unless noshow (pop-to-buffer (setq python-buffer "*Python*"))))
 
-(defun python-mouse-2-command (event)
-  "Command bound to `mouse-2' in inferior Python buffer.
-Selects Comint or Compilation mode command as appropriate."
-  (interactive "e")
-  ;; This only works with the font-lock-based compilation mode.
-  (call-interactively
-   (lookup-key (if (save-window-excursion
-		     (save-excursion
-		       (mouse-set-point event)
-		       (consp (get-text-property (line-beginning-position)
-						 'message))))
-		   compilation-mode-map
-		 comint-mode-map)
-	       [mouse-2])))
-
-(defun python-RET-command ()
-  "Command bound to `RET' in inferior Python buffer.
-Selects Comint or Compilation mode command as appropriate."
-  (interactive)
-  ;; This only works with the font-lock-based compilation mode.
-  (call-interactively
-   (lookup-key (if (consp (get-text-property (line-beginning-position)
-					     'message))
-		   compilation-mode-map
-		 comint-mode-map)
-	       "\C-m")))
-
 (defun python-send-region (start end)
   "Send the region to the inferior Python process."
   ;; The region is evaluated from a temporary file.  This avoids