Fix listp errors in eshell when using aliases

This commit is contained in:
Henrik Lissner 2018-06-23 20:29:54 +02:00
parent adf143a853
commit a0ffc38117
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -8,7 +8,7 @@
(after! eshell (after! eshell
(while aliases (while aliases
(setf (alist-get (pop aliases) +eshell-aliases nil nil #'equal) (setf (alist-get (pop aliases) +eshell-aliases nil nil #'equal)
(pop aliases))) (list (pop aliases))))
(when (boundp 'eshell-command-aliases-list) (when (boundp 'eshell-command-aliases-list)
(if +eshell--default-aliases (if +eshell--default-aliases
(setq eshell-command-aliases-list (setq eshell-command-aliases-list