diff options
| author | Dan Leslie <dan@ironoxide.ca> | 2018-11-11 10:29:54 -0800 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2018-11-12 17:46:57 +0000 |
| commit | 149cf613ee81f40f678b08f1c451ad256d843c94 (patch) | |
| tree | 5a477696469483c20c11970920e1fa7158a16af3 /elisp | |
| parent | 4ae2527b4bceecac95dc265ca09a6de60a5d526a (diff) | |
| download | geiser-guile-149cf613ee81f40f678b08f1c451ad256d843c94.tar.gz geiser-guile-149cf613ee81f40f678b08f1c451ad256d843c94.tar.bz2 | |
Removed more unused code, speeding things up.
Diffstat (limited to 'elisp')
| -rw-r--r-- | elisp/geiser-chicken.el | 4 |
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)))") |