From: Glenn Morris Date: Sun, 5 Aug 2012 05:24:50 +0000 (-0700) Subject: * lisp/eshell/esh-ext.el (eshell/addpath): Also update eshell-path-env. X-Git-Tag: emacs-24.2.90~851 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a4f2deaaeba642460b7a0899aa61f7d68e1c69f2;p=emacs.git * lisp/eshell/esh-ext.el (eshell/addpath): Also update eshell-path-env. Fixes: debbugs:12013 --- 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 + + * eshell/esh-ext.el (eshell/addpath): + Also update eshell-path-env. (Bug#12013) + 2012-08-05 Chong Yidong - * 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))