summaryrefslogtreecommitdiff
path: root/doc/modules
diff options
context:
space:
mode:
Diffstat (limited to 'doc/modules')
-rw-r--r--doc/modules/skribilo/documentation/api.scm8
1 files changed, 5 insertions, 3 deletions
diff --git a/doc/modules/skribilo/documentation/api.scm b/doc/modules/skribilo/documentation/api.scm
index d27d074..84108c9 100644
--- a/doc/modules/skribilo/documentation/api.scm
+++ b/doc/modules/skribilo/documentation/api.scm
@@ -347,9 +347,10 @@
;* doc-markup ... */
;*---------------------------------------------------------------------*/
(define-markup (doc-markup id args
- #!rest
+ #!rest
opts
- #!key
+ #!key
+ (ident #f)
(writer-id #f)
(common-args '((:ident "The node identifier.")
(:class "The node class.")))
@@ -557,7 +558,8 @@
(if (and (pair? drest) (not (define-markup-rest d)))
(skribe-error 'doc-markup "No rest argument for" id)
options)
- (list (mark :class "public-definition" (symbol->string id))
+ (list (mark :class "public-definition"
+ (or ident (symbol->string id)))
(map (lambda (i) (mark (symbol->string i))) others)
(map (lambda (i)
(let ((is (symbol->string i)))