* lisp/eshell/esh-ext.el (eshell/addpath): Also update eshell-path-env.

Fixes: debbugs:12013

2 files changed, 8 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a04952def89..7e9da4fa8ff 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,11 @@
+2012-08-05  Glenn Morris  <rgm@gnu.org>
+
+        * eshell/esh-ext.el (eshell/addpath):
+        Also update eshell-path-env.  (Bug#12013)
+
 2012-08-05  Chong Yidong  <cyd@gnu.org>
 
-        * wdired.el (wdired-mode, wdired-change-to-wdired-mode): Doc
-        fixes.
+        * wdired.el (wdired-mode, wdired-change-to-wdired-mode): Doc fixes.
 
         * fringe.el (fringe-styles): Add docstring.
         (fringe--check-mode): New function.
diff --git a/lisp/eshell/esh-ext.el b/lisp/eshell/esh-ext.el
index 603da6f2e30..17020245575 100644
--- a/lisp/eshell/esh-ext.el
+++ b/lisp/eshell/esh-ext.el
@@ -235,7 +235,8 @@ Adds the given PATH to $PATH.")
                                (getenv "PATH"))
                      (concat (getenv "PATH") path-separator
                              (car args))))
-           (setq args (cdr args))))
+           (setq args (cdr args)))
+         (setq eshell-path-env (getenv "PATH")))
      (let ((paths (parse-colon-path (getenv "PATH"))))
        (while paths
          (eshell-printn (car paths))