masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-05 11:49:37 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Relax a path normalization check

Browse source
This commit is contained in:
John Wiegley 2015-03-15 21:23:40 -05:00
parent a203028871
commit 5c85433fac
1 changed files with 1 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/use-package/use-package.el
View file

@ -228,10 +228,7 @@ the user specified.")
(let ((path (if (file-name-absolute-p arg) (let ((path (if (file-name-absolute-p arg)
arg arg
(expand-file-name arg user-emacs-directory)))) (expand-file-name arg user-emacs-directory))))
(if (file-directory-p path) (list path)))
(list path)
(use-package-error
(concat label " wants a directory path, or list of paths")))))
((and (not recursed) (listp arg) (listp (cdr arg))) ((and (not recursed) (listp arg) (listp (cdr arg)))
(mapcar #'(lambda (x) (mapcar #'(lambda (x)
(car (use-package-normalize-paths label x t))) arg)) (car (use-package-normalize-paths label x t))) arg))