[elpa] master da3d7bc 09/11: Ditch cl-lib again in lieu of seq-mapn

[Artur Malabarba]

branch: master
commit da3d7bc8b46d304cdbca631dab2098c51af94b62
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>

    Ditch cl-lib again in lieu of seq-mapn
---
 beacon.el |    7 +++----
 1 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/beacon.el b/beacon.el
index fa1e603..18f2dc2 100644
--- a/beacon.el
+++ b/beacon.el
@@ -5,8 +5,8 @@
 ;; Author: Artur Malabarba <address@hidden>
 ;; URL: https://github.com/Malabarba/beacon
 ;; Keywords: convenience
-;; Version: 0.3
-;; Package-Requires: ((seq "1.9") (cl-lib "0.5"))
+;; Version: 0.4
+;; Package-Requires: ((seq "1.11"))
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
@@ -38,7 +38,6 @@
 ;;; Code:
 
 (require 'seq)
-(require 'cl-lib)
 
 (defgroup beacon nil
   "Customization group for beacon."
@@ -246,7 +245,7 @@ Only returns `beacon-size' elements."
                   (color-distance "white" bg))
                (make-list 3 (* beacon-color 65535)))
               (t (make-list 3 (* (- 1 beacon-color) 65535))))))
-    (apply #'cl-mapcar (lambda (r g b) (format "#%04x%04x%04x" r g b))
+    (apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b))
            (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt bg 
n))))
                    [0 1 2]))))