diff options
| author | Sam Steingold | 2014-05-14 14:17:05 -0400 |
|---|---|---|
| committer | Sam Steingold | 2014-05-14 14:17:05 -0400 |
| commit | b8e11d4102870e70dc50796454fcdae658caadbb (patch) | |
| tree | cd41e4f85fa6416c151196ea742676a510134f3c | |
| parent | d63d883a97e385392a12a5155201417dea7437ec (diff) | |
| download | emacs-b8e11d4102870e70dc50796454fcdae658caadbb.tar.gz emacs-b8e11d4102870e70dc50796454fcdae658caadbb.zip | |
avoid unnecessary questions
* lisp/progmodes/python.el (python-shell-get-or-create-process):
Do not bind `current-prefix-arg' so that C-c C-z does not talk
back unless requested.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/progmodes/python.el | 3 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 015650510f7..3e152174e87 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2014-05-14 Sam Steingold <sds@gnu.org> | ||
| 2 | |||
| 3 | * progmodes/python.el (python-shell-get-or-create-process): | ||
| 4 | Do not bind `current-prefix-arg' so that C-c C-z does not talk | ||
| 5 | back unless requested. | ||
| 6 | |||
| 1 | 2014-05-14 Glenn Morris <rgm@gnu.org> | 7 | 2014-05-14 Glenn Morris <rgm@gnu.org> |
| 2 | 8 | ||
| 3 | * subr.el (with-file-modes): New macro. | 9 | * subr.el (with-file-modes): New macro. |
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el index 240cf8aff8c..436442da2d0 100644 --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el | |||
| @@ -2058,8 +2058,7 @@ startup." | |||
| 2058 | (global-proc-name (python-shell-get-process-name nil)) | 2058 | (global-proc-name (python-shell-get-process-name nil)) |
| 2059 | (global-proc-buffer-name (format "*%s*" global-proc-name)) | 2059 | (global-proc-buffer-name (format "*%s*" global-proc-name)) |
| 2060 | (dedicated-running (comint-check-proc dedicated-proc-buffer-name)) | 2060 | (dedicated-running (comint-check-proc dedicated-proc-buffer-name)) |
| 2061 | (global-running (comint-check-proc global-proc-buffer-name)) | 2061 | (global-running (comint-check-proc global-proc-buffer-name))) |
| 2062 | (current-prefix-arg 16)) | ||
| 2063 | (when (and (not dedicated-running) (not global-running)) | 2062 | (when (and (not dedicated-running) (not global-running)) |
| 2064 | (if (call-interactively 'run-python) | 2063 | (if (call-interactively 'run-python) |
| 2065 | (setq dedicated-running t) | 2064 | (setq dedicated-running t) |