minor tweaks for `python-check'

* lisp/progmodes/python.el (python-check-custom-command): Buffer local
because it usually includes the buffer name.
(python-check-command): Set to epylint when pyflakes is not available.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1eafe3c0e5215bc7af69ecf1c462d39e43673028..80dfeef3750f70eed0ad5ce104b891a60b1689c9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2015-01-27  Sam Steingold  <sds@gnu.org>
+
+       * progmodes/python.el (python-check-custom-command): Buffer local
+       because it usually includes the buffer name.
+       (python-check-command): Set to epylint when pyflakes is not available.
+
 2015-01-27  Thomas Fitzsimmons  <fitzsim@fitzsim.org>
 
        * net/eudcb-bbdb.el, net/eudcb-ldap.el, net/eudcb-mab.el,

diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index d298f96bc81eb3614594193c163b2229323e92ab..13ff439bef29d7413ac30a1938034c6962206878 100644 (file)
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -3816,7 +3816,9 @@ The skeleton will be bound to python-skeleton-NAME."
 ;;; Code check
 
 (defcustom python-check-command
-  "pyflakes"
+  (or (executable-find "pyflakes")
+      (executable-find "epylint")
+      "install pyflakes, pylint or something else")
   "Command used to check a Python file."
   :type 'string
   :group 'python)
@@ -3827,7 +3829,7 @@ The skeleton will be bound to python-skeleton-NAME."
   :type 'string
   :group 'python)
 
-(defvar python-check-custom-command nil
+(defvar-local python-check-custom-command nil
   "Internal use.")
 
 (defun python-check (command)