emacs-diffs
[Top][All Lists]
Advanced

[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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]