[elpa] externals/tempel 3bc7eaf15e 1/3: Optimize slightly

[ELPA Syncer]

branch: externals/tempel
commit 3bc7eaf15ef3eddb50120643e0d7a0f9e511c555
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Optimize slightly
---
 tempel.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/tempel.el b/tempel.el
index 5e83abe402..5365f635c0 100644
--- a/tempel.el
+++ b/tempel.el
@@ -39,7 +39,6 @@
 
 ;;; Code:
 
-(require 'seq)
 (eval-when-compile
   (require 'subr-x)
   (require 'cl-lib))
@@ -132,8 +131,10 @@ may be named with `tempel--name' or carry an evaluatable 
Lisp expression
     (goto-char (point-min))
     (let ((templates (read (current-buffer))) result)
       (while (and templates (symbolp (car templates)))
-        (push (cons (car templates) (seq-take-while #'consp (cdr templates))) 
result)
-        (setq templates (seq-drop-while #'consp (cdr templates))))
+        (let ((mode (pop templates)) list)
+          (while (and templates (consp (car templates)))
+            (push (pop templates) list))
+          (push (cons mode (nreverse list)) result)))
       result)))
 
 (defun tempel--print-element (elt)