]> code.delx.au - gnu-emacs-elpa/commitdiff
Fix missing function `some' issue when loading compiled elisp.
authorJaehyun Yeom <jae.yeom@gmail.com>
Sat, 12 May 2012 20:06:53 +0000 (21:06 +0100)
committerReuben Thomas <rrt@sc3d.org>
Sat, 12 May 2012 20:06:53 +0000 (21:06 +0100)
Function `some' requires 'cl and it is loaded while compilation only.

coffee-mode.el

index db0f631e9b413e78829e9b608e50f3210382be69..cfa90a4157b29b2fd212d14701c5ca9f6b592633 100644 (file)
@@ -517,10 +517,12 @@ previous line."
         (end-of-line)
 
         ;; Optimized for speed - checks only the last character.
-        (when (some (lambda (char)
-                        (= (char-before) char))
-                      coffee-indenters-eol)
-          (setq indenter-at-eol t)))
+        (let ((indenters coffee-indenters-eol))
+          (while indenters
+            (if (/= (char-before) (car indenters))
+                (setq indenters (cdr indenters))
+              (setq indenter-at-eol t)
+              (setq indenters nil)))))
 
       ;; If we found an indenter, return `t'.
       (or indenter-at-bol indenter-at-eol))))