Move nil-or-list-of-strings-p to a separate package

This commit is contained in:
2018-07-25 07:14:28 +02:00
parent 4a9cfddc6b
commit eeb501ce9e
2 changed files with 15 additions and 6 deletions

14
lisp/utils.el Normal file
View File

@@ -0,0 +1,14 @@
;;; utils --- Summary
;;; Commentary:
;;; Code:
(defun nil-or-list-of-strings-p (var)
"Return t if VAR is either nil or a list holding only strings."
(or (null var)
(not (null (delq nil
(mapcar (lambda (x) (and (stringp x) x)) var))))))
(provide 'utils)
;;; utils.el ends here