branch: elpa/geiser-chicken
commit d69c1ead25b132ed65a8faecd7954d89761c1fd0
Author: Dan Leslie <[email protected]>
Commit: Jose Antonio Ortega Ruiz <[email protected]>
Removed more unused code, speeding things up.
---
elisp/geiser-chicken.el | 4 ++--
1 file 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)))")