Detect if PYTHONPATH has proper value for process.

Author: proofit404

pythonic.el

@@ -217,8 +217,8 @@ process flag."
 
 (defun pythonic-proper-environment-p (process)
   "Determine if python environment has been changed since PROCESS was started."
-  (if (process-get process 'pythonic)
-      t
+  (--if-let (process-get process 'pythonic)
+      (equal (plist-get it :pythonpath) (pythonic-get-pythonpath))
     (error "Process %s wasn't started with `start-pythonic'"
            (process-name process))))
 

test/pythonic-test.el

@@ -397,6 +397,12 @@ change since process was start."
   (let ((process (start-pythonic :process "out" :args '("-V"))))
     (should (pythonic-proper-environment-p process))))
 
+(ert-deftest test-pythonic-proper-environment-p-change-pythonpath ()
+  "`pythonic-proper-environment-p' is null if PYTHONPATH was changed."
+  (let* ((process (start-pythonic :process "out" :args '("-V")))
+         (python-shell-extra-pythonpaths '("/home/test/modules")))
+    (should-not (pythonic-proper-environment-p process))))
+
 ;;; Activate/deactivate environment.
 
 (ert-deftest test-pythonic-activate ()