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