Fix: not using mapcar for effect
authorJose Antonio Ortega Ruiz <jao@gnu.org>
Thu, 19 Sep 2013 00:19:45 +0000 (19 02:19 +0200)
committerJose Antonio Ortega Ruiz <jao@gnu.org>
Thu, 19 Sep 2013 00:19:45 +0000 (19 02:19 +0200)
elisp/geiser-guile.el

index 994ea6b..9182807 100644 (file)
@@ -323,10 +323,9 @@ it spawn a server thread."
   (let ((geiser-log-verbose-p t))
     (when remote (geiser-guile--set-geiser-load-path))
     (geiser-eval--send/wait ",use (geiser emacs)\n'done")
-    (mapcar (lambda (dir)
-              (let ((dir (expand-file-name dir)))
-                (geiser-eval--send/wait `(:eval (:ge add-to-load-path ,dir)))))
-            geiser-guile-load-path)
+    (dolist (dir geiser-guile-load-path)
+      (let ((dir (expand-file-name dir)))
+        (geiser-eval--send/wait `(:eval (:ge add-to-load-path ,dir)))))
     (geiser-guile-update-warning-level)))
 
 \f