aboutsummaryrefslogtreecommitdiff
path: root/src/guile/skribilo/verify.scm
diff options
context:
space:
mode:
Diffstat (limited to 'src/guile/skribilo/verify.scm')
-rw-r--r--src/guile/skribilo/verify.scm15
1 files changed, 9 insertions, 6 deletions
diff --git a/src/guile/skribilo/verify.scm b/src/guile/skribilo/verify.scm
index 052b5cc..60ef519 100644
--- a/src/guile/skribilo/verify.scm
+++ b/src/guile/skribilo/verify.scm
@@ -20,16 +20,19 @@
;;; USA.
(define-module (skribilo verify)
- :autoload (skribilo engine) (engine-ident processor-get-engine)
+ :autoload (skribilo engine) (engine-ident engine-class processor-get-engine)
:autoload (skribilo writer) (writer? writer-options lookup-markup-writer)
:autoload (skribilo lib) (skribe-warning/ast skribe-warning
skribe-error)
+
+ :use-module (skribilo debug)
+ :use-module (skribilo ast)
+ :use-module (oop goops)
+
+ :use-module (skribilo utils syntax)
+
:export (verify))
-(use-modules (skribilo debug)
- (skribilo ast)
- (skribilo utils syntax)
- (oop goops))
(fluid-set! current-reader %skribilo-module-reader)
@@ -127,7 +130,7 @@
(next-method)
- (let ((w (lookup-markup-writer node e)))
+ (let ((w (lookup-markup-writer node (engine-class e))))
(when (writer? w)
(check-required-options node w e)
(when (pair? (writer-options w))