* dash.el (---truthy?): Simplify.

5 years ago · 565055e95c
parent 994cda98ca
commit 565055e95c
1 changed files with 3 additions and 2 deletions
--- a/dash.el
+++ b/dash.el
@ -860,9 +860,10 @@ See also: `-last-item'."
  "Counts the number of items in LIST where (PRED item) is non-nil."
  (--count (funcall pred it) list))

-(defun ---truthy? (val)
+(defun ---truthy? (obj)
+  "Return OBJ as a boolean value (t or nil)."
  (declare (pure t) (side-effect-free t))
-  (not (null val)))
+  (and obj t))

 (defmacro --any? (form list)
  "Anaphoric form of `-any?'."