diff options
| -rw-r--r-- | elisp/geiser-guile.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el index 1710052..cb67f41 100644 --- a/elisp/geiser-guile.el +++ b/elisp/geiser-guile.el @@ -25,7 +25,7 @@ (require 'compile) (require 'info-look) -(eval-when-compile (require 'cl)) +(eval-when-compile (require 'cl-lib)) ;;; Customization: @@ -157,7 +157,7 @@ This function uses `geiser-guile-init-file' if it exists." (mapconcat 'identity args " ")) (defun geiser-guile--geiser-procedure (proc &rest args) - (case proc + (cl-case proc ((eval compile) (format ",geiser-eval %s %s%s" (or (car args) "#f") (geiser-guile--linearize-args (cdr args)) |