diff options
-rw-r--r-- | elisp/geiser-guile.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el index dacca55..0b71edf 100644 --- a/elisp/geiser-guile.el +++ b/elisp/geiser-guile.el @@ -158,7 +158,8 @@ This function uses `geiser-guile-init-file' if it exists." (or (car args) "#f") (geiser-guile--linearize-args (cdr args)) (if (cddr args) "" " ()"))) - ((load-file compile-file) (format ",geiser-load-file %s" (car args))) + ((load-file compile-file) + (format ",geiser-load-file %s" (expand-file-name (car args)))) ((no-values) ",geiser-no-values") (t (format "ge:%s (%s)" proc (geiser-guile--linearize-args args))))) |