Add error checks & docstrings to doom-keyword-* lib functions
This commit is contained in:
parent
53a7e35082
commit
2637c415d3
1 changed files with 5 additions and 3 deletions
|
@ -58,13 +58,15 @@
|
||||||
t)))
|
t)))
|
||||||
|
|
||||||
(defun doom-keyword-intern (str)
|
(defun doom-keyword-intern (str)
|
||||||
"TODO"
|
"Converts STR (a string) into a keyword (`keywordp')."
|
||||||
|
(or (stringp str)
|
||||||
|
(signal 'wrong-type-argument (list 'stringp str)))
|
||||||
(intern (concat ":" str)))
|
(intern (concat ":" str)))
|
||||||
|
|
||||||
(defun doom-keyword-name (keyword)
|
(defun doom-keyword-name (keyword)
|
||||||
"TODO"
|
"Returns the string name of KEYWORD (`keywordp') minus the leading colon."
|
||||||
(or (keywordp keyword)
|
(or (keywordp keyword)
|
||||||
(signal 'wrong-type-argument (list 'keyword keyword)))
|
(signal 'wrong-type-argument (list 'keywordp keyword)))
|
||||||
(substring (symbol-name keyword) 1))
|
(substring (symbol-name keyword) 1))
|
||||||
|
|
||||||
(cl-defun doom-files-in (dirs &key when unless full map (nosort t) (match "^[^.]"))
|
(cl-defun doom-files-in (dirs &key when unless full map (nosort t) (match "^[^.]"))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue