From 149cf613ee81f40f678b08f1c451ad256d843c94 Mon Sep 17 00:00:00 2001 From: Dan Leslie Date: Sun, 11 Nov 2018 10:29:54 -0800 Subject: Removed more unused code, speeding things up. --- elisp/geiser-chicken.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'elisp') 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)))") -- cgit v1.2.3