branch: elpa/llama
commit 38aebc2781b75ee96a54d1d361807b1c23c6768e
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>

    No longer depend on cl-lib
---
 llama.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/llama.el b/llama.el
index 26b88a5dc9..cc4cfa2366 100644
--- a/llama.el
+++ b/llama.el
@@ -77,7 +77,6 @@
 
 ;;; Code:
 
-(eval-when-compile (require 'cl-lib))
 (require 'seq)
 
 ;;;###autoload
@@ -115,7 +114,8 @@ If you enable `llama-mode' or `global-llama-mode', then the
 above is *displayed* as:
 
   ##(foo % (bar %3) %*)"
-  (cl-check-type fn symbol)
+  (unless (symbolp fn)
+    (signal 'wrong-type-argument (list 'symbolp fn)))
   `(lambda ,(llama--arguments args)
      (,fn ,@args)))
 
@@ -124,7 +124,7 @@ above is *displayed* as:
     (llama--collect data args)
     `(,@(let ((n 0))
           (mapcar (lambda (symbol)
-                    (cl-incf n)
+                    (setq n (1+ n))
                     (or symbol (intern (format "_%%%s" n))))
                   (reverse (seq-drop-while
                             'null

Reply via email to