Minor issue in defextension macro has been fixed

Signed-off-by: Sameer Rahmani <lxsameer@gnu.org>
This commit is contained in:
Sameer Rahmani 2020-03-12 19:03:40 +00:00
parent 950575a38f
commit 71b23ca7bf
1 changed files with 4 additions and 4 deletions

View File

@ -80,7 +80,7 @@
(or (fg42-extension-path extension)
;; TODO: should we extract variables such as `fg42-home' to their
;; dedicated ns in order to avoid the warning ?
(concat fg42-home "lib/extensions/" (fg42-extension-name extension))))
(concat fg42-home "/lib/extensions/" (fg42-extension-name extension) ".el")))
(defun load-extension (ext)
@ -115,9 +115,9 @@ to them.
(declare (doc-string 2) (indent 1))
;; TODO: Inject the docstring to the current `system' in order
;; to collect it later for `describe-extension' function.
`(defvar name (apply 'make-fg42-extension
:name ,(symbol-name name)
(quote ,args))))
`(setq ,name (apply 'make-fg42-extension
:name ,(symbol-name name)
(quote ,args))))
(defmacro with-ability (name &rest body)