mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-23 07:19:15 +00:00
* lisp/shell.el (shell-directory-tracker): Go back to just ignoring failures.
Fixes: debbugs:17159
This commit is contained in:
parent
79ebc53034
commit
a9c921e66b
@ -1,3 +1,8 @@
|
||||
2014-04-07 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* shell.el (shell-directory-tracker):
|
||||
Go back to just ignoring failures. (Bug#17159)
|
||||
|
||||
2014-04-06 João Távora <joaotavora@gmail.com>
|
||||
|
||||
Fix `electric-pair-delete-adjacent-pairs' in modes binding
|
||||
|
@ -792,8 +792,11 @@ and `shell-pushd-dunique' control the behavior of the relevant command.
|
||||
Environment variables are expanded, see function `substitute-in-file-name'."
|
||||
(if shell-dirtrackp
|
||||
;; We fail gracefully if we think the command will fail in the shell.
|
||||
(with-demoted-errors "Couldn't cd: %s"
|
||||
(let ((start (progn (string-match
|
||||
;;; (with-demoted-errors "Directory tracker failure: %s"
|
||||
;; This fails so often that it seems better to just ignore errors (?).
|
||||
;; Eg even: foo=/tmp; cd $foo is beyond us (bug#17159).
|
||||
(ignore-errors
|
||||
(let ((start (progn (string-match
|
||||
(concat "^" shell-command-separator-regexp)
|
||||
str) ; skip whitespace
|
||||
(match-end 0)))
|
||||
|
Loading…
Reference in New Issue
Block a user