Mercurial > emacs
comparison lisp/progmodes/python.el @ 58357:9fc67253aa56
(python-switch-to-python): If Python isn't running, start it.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 20 Nov 2004 20:39:16 +0000 |
| parents | e6bf7376c962 |
| children | 6ec84037b6bc |
comparison
equal
deleted
inserted
replaced
| 58356:4ca1b78a471f | 58357:9fc67253aa56 |
|---|---|
| 1233 | 1233 |
| 1234 (defun python-switch-to-python (eob-p) | 1234 (defun python-switch-to-python (eob-p) |
| 1235 "Switch to the Python process buffer. | 1235 "Switch to the Python process buffer. |
| 1236 With prefix arg, position cursor at end of buffer." | 1236 With prefix arg, position cursor at end of buffer." |
| 1237 (interactive "P") | 1237 (interactive "P") |
| 1238 (if (get-buffer python-buffer) | 1238 ;; Start python unless we have a buffer. |
| 1239 (pop-to-buffer python-buffer) | 1239 (unless (and python-buffer |
| 1240 (error "No current process buffer. See variable `python-buffer'")) | 1240 (get-buffer python-buffer)) |
| 1241 (run-python nil t)) | |
| 1242 (pop-to-buffer python-buffer) | |
| 1243 ;; Make extra sure python is running in this buffer. | |
| 1244 (python-proc) | |
| 1241 (when eob-p | 1245 (when eob-p |
| 1242 (push-mark) | 1246 (push-mark) |
| 1243 (goto-char (point-max)))) | 1247 (goto-char (point-max)))) |
| 1244 | 1248 |
| 1245 (add-to-list 'debug-ignored-errors "^No current process buffer.") | 1249 (add-to-list 'debug-ignored-errors "^No current process buffer.") |
