ob-asymptote: silence byte-compiler
authorNicolas Goaziou <n.goaziou@gmail.com>
Sun, 25 Sep 2011 14:19:27 +0000 (16:19 +0200)
committerNicolas Goaziou <n.goaziou@gmail.com>
Sun, 25 Sep 2011 14:19:27 +0000 (16:19 +0200)
* lisp/ob-asymptote.el (org-babel-asymptote-define-type): silence byte-compiler.

lisp/ob-asymptote.el

index 2219e03..5bd33f5 100644 (file)
@@ -131,14 +131,16 @@ The type is `string' if any element in DATA is
 a string. Otherwise, it is either `real', if some elements are
 floats, or `int'."
   (let* ((type 'int)
+        find-type                      ; for byte-compiler
         (find-type
-         (lambda (row)
-           (catch 'exit
-             (mapc (lambda (el)
-                     (cond ((listp el) (funcall find-type el))
-                           ((stringp el) (throw 'exit (setq type 'string)))
-                           ((floatp el) (setq type 'real))))
-                   row)))))
+         (function
+          (lambda (row)
+            (catch 'exit
+              (mapc (lambda (el)
+                      (cond ((listp el) (funcall find-type el))
+                            ((stringp el) (throw 'exit (setq type 'string)))
+                            ((floatp el) (setq type 'real))))
+                    row))))))
     (funcall find-type data) type))
 
 (provide 'ob-asymptote)