summaryrefslogtreecommitdiff
path: root/elisp/geiser-chicken.el
diff options
context:
space:
mode:
authorDan Leslie <dan@ironoxide.ca>2018-11-11 10:29:54 -0800
committerJose Antonio Ortega Ruiz <jao@gnu.org>2018-11-12 17:46:57 +0000
commit149cf613ee81f40f678b08f1c451ad256d843c94 (patch)
tree5a477696469483c20c11970920e1fa7158a16af3 /elisp/geiser-chicken.el
parent4ae2527b4bceecac95dc265ca09a6de60a5d526a (diff)
downloadgeiser-guile-149cf613ee81f40f678b08f1c451ad256d843c94.tar.gz
geiser-guile-149cf613ee81f40f678b08f1c451ad256d843c94.tar.bz2
Removed more unused code, speeding things up.
Diffstat (limited to 'elisp/geiser-chicken.el')
-rw-r--r--elisp/geiser-chicken.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-chicken.el b/elisp/geiser-chicken.el
index 078db57..35b139f 100644
--- a/elisp/geiser-chicken.el
+++ b/elisp/geiser-chicken.el
@@ -270,9 +270,9 @@ This function uses `geiser-chicken-init-file' if it exists."
(defun geiser-chicken4--compile-or-load (force-load)
(let ((target
- (expand-file-name "chicken/geiser/emacs.so" geiser-scheme-dir))
+ (expand-file-name "chicken/geiser/chicken4.so" geiser-scheme-dir))
(source
- (expand-file-name "chicken/geiser/emacs.scm" geiser-scheme-dir))
+ (expand-file-name "chicken/geiser/chicken4.scm" geiser-scheme-dir))
(force-load (or force-load (eq system-type 'windows-nt)))
(suppression-prefix
"(define geiser-stdout (current-output-port))(current-output-port (make-output-port (lambda a #f) (lambda a #f)))")