[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-29 1753da24cd4: Fix infloop in 'shell-resync-dirs' with tcsh
From: |
Eli Zaretskii |
Subject: |
emacs-29 1753da24cd4: Fix infloop in 'shell-resync-dirs' with tcsh |
Date: |
Sat, 10 Dec 2022 07:55:47 -0500 (EST) |
branch: emacs-29
commit 1753da24cd44821bf39f03dc32476e320e732fca
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>
Fix infloop in 'shell-resync-dirs' with tcsh
* lisp/shell.el (shell-resync-dirs): Remove trailing slash from
output of 'dirs', for csh/tcsh's sake. (Bug#59804)
---
lisp/shell.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/lisp/shell.el b/lisp/shell.el
index b396bc2b180..dadbdcbc034 100644
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -1162,6 +1162,7 @@ line output and parses it to form the new directory
stack."
(dlsl nil)
(pos 0)
(ds nil))
+ (setq dls (string-trim-right dls "[ ]+"))
;; Split the dirlist into whitespace and non-whitespace chunks.
;; dlsl will be a reversed list of tokens.
(while (string-match "\\(\\S-+\\|\\s-+\\)" dls pos)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-29 1753da24cd4: Fix infloop in 'shell-resync-dirs' with tcsh,
Eli Zaretskii <=