aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/guile/skribilo/engine/info.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/guile/skribilo/engine/info.scm b/src/guile/skribilo/engine/info.scm
index 8b1b049..811017b 100644
--- a/src/guile/skribilo/engine/info.scm
+++ b/src/guile/skribilo/engine/info.scm
@@ -418,6 +418,11 @@
(info-subsection-ref target e))
((subsubsection)
(info-subsubsection-ref target e))
+ ((mark)
+ ;; We can't refer directly to marks, so refer to the
+ ;; enclosing section as an approximation.
+ (let ((parent (find1-up %block? target)))
+ (info-chapter-ref parent e)))
(else
(skribe-warning/ast 1 target
"ref: don't know how to refer to target")