summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2013-09-19 02:19:45 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2013-09-19 02:19:45 +0200
commitaf0122ccb4fb2d47eced9cf63a6ba53d992ba3d7 (patch)
treee79683d94a92d44dd911e057a5fa2e712b27ade1 /elisp
parent7d17a3cc9a9a637bd87d8c87fee3e342b88ee286 (diff)
downloadgeiser-guile-af0122ccb4fb2d47eced9cf63a6ba53d992ba3d7.tar.gz
geiser-guile-af0122ccb4fb2d47eced9cf63a6ba53d992ba3d7.tar.bz2
Fix: not using mapcar for effect
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-guile.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el
index 994ea6b..9182807 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -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)))