aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorIvan Andrus2014-11-01 12:33:02 -0600
committerIvan Andrus2014-11-14 21:56:11 -0700
commit15ec2d7cffe5f0eb4c073ef7b446a654fb8419e4 (patch)
tree7a7a6b37d8e48183c824c15ce5cdd5c50be3ae87
parentdf33e85a807656a13b3020d8f65d5da728bb808e (diff)
downloademacs-15ec2d7cffe5f0eb4c073ef7b446a654fb8419e4.tar.gz
emacs-15ec2d7cffe5f0eb4c073ef7b446a654fb8419e4.zip
Backport Use derived-mode-p in python.el instead of equality test with major-mode
Fixes: debbugs:18854 * progmodes/python.el (python-ffap-module-path): Use `derived-mode-p' instead of equality test on `major-mode'.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/progmodes/python.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ce4221f7795..a6ab3b87e43 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12014-11-14 Ivan Andrus <darthandrus@gmail.com>
2
3 * progmodes/python.el (python-ffap-module-path): Use
4 `derived-mode-p' instead of equality test on `major-mode'.
5
12014-11-13 Ulrich Müller <ulm@gentoo.org> 62014-11-13 Ulrich Müller <ulm@gentoo.org>
2 7
3 * version.el (emacs-repository-get-version): Call `git log' 8 * version.el (emacs-repository-get-version): Call `git log'
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index c828de10304..95fc52d4d54 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -3281,7 +3281,7 @@ The skeleton will be bound to python-skeleton-NAME."
3281(defun python-ffap-module-path (module) 3281(defun python-ffap-module-path (module)
3282 "Function for `ffap-alist' to return path for MODULE." 3282 "Function for `ffap-alist' to return path for MODULE."
3283 (let ((process (or 3283 (let ((process (or
3284 (and (eq major-mode 'inferior-python-mode) 3284 (and (derived-mode-p 'inferior-python-mode)
3285 (get-buffer-process (current-buffer))) 3285 (get-buffer-process (current-buffer)))
3286 (python-shell-get-process)))) 3286 (python-shell-get-process))))
3287 (if (not process) 3287 (if (not process)