Simplify form to use `remove'

1 files changed, 8 insertions, 8 deletions

diff --git a/sx-auth.el b/sx-auth.el
index b4ad633..b6c0411 100644
--- a/sx-auth.el
+++ b/sx-auth.el
@@ -154,14 +154,14 @@ If it has `auth-required' properties, return a filter that has
 removed those properties."
   (let* ((incl-filter (if (listp filter) (car filter)))
          (rest-filter (if incl-filter (cdr filter)))
-         (auth-filters (cl-remove-if #'null
-                                     ;; Only retrieve the elements that
-                                     ;; are issues.
-                                     (mapcar (lambda (prop)
-                                               (car
-                                                (member prop
-                                                        sx-auth-filter-auth)))
-                                             (or incl-filter filter))))
+         (auth-filters (remove nil
+                               ;; Only retrieve the elements that
+                               ;; are issues.
+                               (mapcar (lambda (prop)
+                                         (car
+                                          (member prop
+                                                  sx-auth-filter-auth)))
+                                       (or incl-filter filter))))
          clean-filter out-filter)
     (lwarn "sx-auth filter" :debug "Filter: %S" filter)
     ;; Auth-filters is the filters that are issues