about summary refs log tree commit diff
path: root/users/wpcarro/emacs/pkgs/cycle/cycle.el
diff options
context:
space:
mode:
Diffstat (limited to 'users/wpcarro/emacs/pkgs/cycle/cycle.el')
-rw-r--r--users/wpcarro/emacs/pkgs/cycle/cycle.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/users/wpcarro/emacs/pkgs/cycle/cycle.el b/users/wpcarro/emacs/pkgs/cycle/cycle.el
index 0d9834f6bf29..17dbd2fdb906 100644
--- a/users/wpcarro/emacs/pkgs/cycle/cycle.el
+++ b/users/wpcarro/emacs/pkgs/cycle/cycle.el
@@ -16,7 +16,6 @@
 
 (require 'dash)
 (require 'maybe)
-(require 'list)
 (require 'struct)
 (require 'cl-lib)
 
@@ -164,9 +163,7 @@ If X is the currently focused value, after it's deleted, current-index will be
 
 (defun cycle-contains? (x xs)
   "Return t if cycle, XS, has member X."
-  (->> xs
-       cycle-xs
-       (list-contains? x)))
+  (maybe-some? (-contains? (cycle-xs xs) x)))
 
 (defun cycle-empty? (xs)
   "Return t if cycle XS has no elements."