lang/javascript: fix +javascript-npm-dep-p to accept symbols

This commit is contained in:
Henrik Lissner 2017-04-02 23:02:50 -04:00
parent 53b9e92fd7
commit 1062a15d8c

View File

@ -20,11 +20,15 @@ ignore the cache."
(+javascript-npm-conf))) (+javascript-npm-conf)))
(let ((deps (append (cdr (assq 'dependencies data)) (let ((deps (append (cdr (assq 'dependencies data))
(cdr (assq 'devDependencies data))))) (cdr (assq 'devDependencies data)))))
(cond ((listp packages)
(funcall (if (eq (car packages) 'and) (funcall (if (eq (car packages) 'and)
'cl-every 'cl-every
'cl-some) 'cl-some)
(lambda (pkg) (assq pkg deps)) (lambda (pkg) (assq pkg deps))
(if (listp packages) packages (list packages)))))) (if (listp packages) packages (list packages))))
((symbolp packages)
(assq packages deps))
(t (error "Expected a package symbol or list, got %s" packages))))))
;;;###autoload ;;;###autoload
(defun +javascript/repl () (defun +javascript/repl ()