comparison lisp/progmodes/python.el @ 54881:fb2f71e89f5f

(python-mouse-2-command, python-RET-command): Remove unused functions.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 14 Apr 2004 18:59:10 +0000
parents 3768540a819c
children 476bf87a815c
comparison
equal deleted inserted replaced
54880:f23c0b924770 54881:fb2f71e89f5f
1127 print '_emacs_out', func.__name__+inspect.formatargspec (args, varargs, varkw, defaults) 1127 print '_emacs_out', func.__name__+inspect.formatargspec (args, varargs, varkw, defaults)
1128 1128
1129 print '_emacs_ok'")) 1129 print '_emacs_ok'"))
1130 (unless noshow (pop-to-buffer (setq python-buffer "*Python*")))) 1130 (unless noshow (pop-to-buffer (setq python-buffer "*Python*"))))
1131 1131
1132 (defun python-mouse-2-command (event)
1133 "Command bound to `mouse-2' in inferior Python buffer.
1134 Selects Comint or Compilation mode command as appropriate."
1135 (interactive "e")
1136 ;; This only works with the font-lock-based compilation mode.
1137 (call-interactively
1138 (lookup-key (if (save-window-excursion
1139 (save-excursion
1140 (mouse-set-point event)
1141 (consp (get-text-property (line-beginning-position)
1142 'message))))
1143 compilation-mode-map
1144 comint-mode-map)
1145 [mouse-2])))
1146
1147 (defun python-RET-command ()
1148 "Command bound to `RET' in inferior Python buffer.
1149 Selects Comint or Compilation mode command as appropriate."
1150 (interactive)
1151 ;; This only works with the font-lock-based compilation mode.
1152 (call-interactively
1153 (lookup-key (if (consp (get-text-property (line-beginning-position)
1154 'message))
1155 compilation-mode-map
1156 comint-mode-map)
1157 "\C-m")))
1158
1159 (defun python-send-region (start end) 1132 (defun python-send-region (start end)
1160 "Send the region to the inferior Python process." 1133 "Send the region to the inferior Python process."
1161 ;; The region is evaluated from a temporary file. This avoids 1134 ;; The region is evaluated from a temporary file. This avoids
1162 ;; problems with blank lines, which have different semantics 1135 ;; problems with blank lines, which have different semantics
1163 ;; interactively and in files. It also saves the inferior process 1136 ;; interactively and in files. It also saves the inferior process