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'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ce4221f779585db497ebf38263695da65f454d29..a6ab3b87e4367bec84b8ffaa4972fdc846cc70ab 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-11-14  Ivan Andrus  <darthandrus@gmail.com>
+
+       * progmodes/python.el (python-ffap-module-path): Use
+       `derived-mode-p' instead of equality test on `major-mode'.
+
 2014-11-13  Ulrich Müller  <ulm@gentoo.org>
 
        * version.el (emacs-repository-get-version): Call `git log'

diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index c828de10304432425dd7a06d000c33ea7ea14496..95fc52d4d5464e30fd74247bdf52e1890be27e55 100644 (file)
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -3281,7 +3281,7 @@ The skeleton will be bound to python-skeleton-NAME."
 (defun python-ffap-module-path (module)
   "Function for `ffap-alist' to return path for MODULE."
   (let ((process (or
-                  (and (eq major-mode 'inferior-python-mode)
+                  (and (derived-mode-p 'inferior-python-mode)
                        (get-buffer-process (current-buffer)))
                   (python-shell-get-process))))
     (if (not process)