Skip to content

Commit

Permalink
Preserve order of eshell buffer-list (emacs-helm#1804)
Browse files Browse the repository at this point in the history
* helm-files.el (helm-ff-switch-to-eshell): Don't sort.
  • Loading branch information
Thierry Volpiatto committed Jun 27, 2017
1 parent 8223167 commit 17a8397
Showing 1 changed file with 4 additions and 5 deletions.
9 changes: 4 additions & 5 deletions helm-files.el
Original file line number Diff line number Diff line change
Expand Up @@ -912,11 +912,10 @@ prefix arg eshell buffer doesn't exists, create it and switch to it."
(let ((cd-eshell (lambda ()
(eshell/cd helm-ff-default-directory)
(eshell-reset)))
(bufs (sort (cl-loop for b in (mapcar 'buffer-name (buffer-list))
when (with-current-buffer b
(eq major-mode 'eshell-mode))
collect b)
'string<)))
(bufs (cl-loop for b in (mapcar 'buffer-name (buffer-list))
when (with-current-buffer b
(eq major-mode 'eshell-mode))
collect b)))
(helm-aif (and (null helm-current-prefix-arg)
(if (cdr bufs)
(helm-comp-read "Switch to eshell buffer: " bufs)
Expand Down

0 comments on commit 17a8397

Please sign in to comment.