branch: elpa/geiser-gauche
commit 13e4030155e6de35624bd57abf9ee469376ac46d
Author: András Simonyi <[email protected]>
Commit: András Simonyi <[email protected]>
Implement adding to load-path
---
geiser.scm | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/geiser.scm b/geiser.scm
index a0639f2..780b2fb 100644
--- a/geiser.scm
+++ b/geiser.scm
@@ -10,13 +10,13 @@
geiser:no-values
geiser:completions
geiser:module-completions
+ geiser:add-to-load-path
;; Missing functions:
;; geiser-start-server
;; geiser-object-signature
;; geiser-symbol-location
;; geiser-symbol-documentation
;; geiser-find-file
- ;; geiser-add-to-load-path
;; geiser-compile-file
;; geiser-compile
;; geiser-module-path
@@ -79,3 +79,8 @@
(map (^x (symbol->string (module-name x)))
(all-modules))))
+;; Further
+
+;; TODO We add the load-path at the end. Is this correct?
+(define-macro (geiser:add-to-load-path dir)
+ `(add-load-path ,dir :after))
