diff options
author | William Carroll <wpcarro@gmail.com> | 2020-08-31T13·59+0100 |
---|---|---|
committer | William Carroll <wpcarro@gmail.com> | 2020-08-31T13·59+0100 |
commit | a35f723d9271c081318fe463cd6fc51757d8cb0f (patch) | |
tree | ca57e41d3ec34a5b7be164793babd9f00c7d9c78 /emacs/.emacs.d/wpc/alist.el | |
parent | 1c87082648c6d265bddaf160f858f14240db739d (diff) |
Lint maybe.el
This change had rippling implications.
Diffstat (limited to 'emacs/.emacs.d/wpc/alist.el')
-rw-r--r-- | emacs/.emacs.d/wpc/alist.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/emacs/.emacs.d/wpc/alist.el b/emacs/.emacs.d/wpc/alist.el index f23109ce6a38..439fb67b27ab 100644 --- a/emacs/.emacs.d/wpc/alist.el +++ b/emacs/.emacs.d/wpc/alist.el @@ -135,7 +135,7 @@ Returns the first occurrence of K in XS since alists support multiple entries." "Apply F to the value stored at K in XS. If `K' is not in `XS', this function errors. Use `alist/upsert' if you're interested in inserting a value when a key doesn't already exist." - (if (maybe/nil? (alist/get k xs)) + (if (maybe-nil? (alist/get k xs)) (error "Refusing to update: key does not exist in alist") (alist/set k (funcall f (alist/get k xs)) xs))) @@ -183,11 +183,11 @@ Mutative variant of `alist/delete'." (defun alist/has-key? (k xs) "Return t if XS has a key `equal' to K." - (maybe/some? (assoc k xs))) + (maybe-some? (assoc k xs))) (defun alist/has-value? (v xs) "Return t if XS has a value of V." - (maybe/some? (rassoc v xs))) + (maybe-some? (rassoc v xs))) (defun alist/count (xs) "Return the number of entries in XS." |