Minor issue in defextension macro has been fixed
Signed-off-by: Sameer Rahmani <lxsameer@gnu.org>
This commit is contained in:
parent
950575a38f
commit
71b23ca7bf
|
@ -80,7 +80,7 @@
|
||||||
(or (fg42-extension-path extension)
|
(or (fg42-extension-path extension)
|
||||||
;; TODO: should we extract variables such as `fg42-home' to their
|
;; TODO: should we extract variables such as `fg42-home' to their
|
||||||
;; dedicated ns in order to avoid the warning ?
|
;; 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)
|
(defun load-extension (ext)
|
||||||
|
@ -115,9 +115,9 @@ to them.
|
||||||
(declare (doc-string 2) (indent 1))
|
(declare (doc-string 2) (indent 1))
|
||||||
;; TODO: Inject the docstring to the current `system' in order
|
;; TODO: Inject the docstring to the current `system' in order
|
||||||
;; to collect it later for `describe-extension' function.
|
;; to collect it later for `describe-extension' function.
|
||||||
`(defvar name (apply 'make-fg42-extension
|
`(setq ,name (apply 'make-fg42-extension
|
||||||
:name ,(symbol-name name)
|
:name ,(symbol-name name)
|
||||||
(quote ,args))))
|
(quote ,args))))
|
||||||
|
|
||||||
|
|
||||||
(defmacro with-ability (name &rest body)
|
(defmacro with-ability (name &rest body)
|
||||||
|
|
Loading…
Reference in New Issue