summary refs log tree commit diff
path: root/doc
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-09-04 10:32:04 +0200
committerLudovic Courtès <ludo@gnu.org>2020-09-04 11:29:51 +0200
commitfe409700d85a8de0fadb9cdd052434a4e07b4267 (patch)
treea7130c348ad31bf77177edc5f880349a106ad28f /doc
parent720fd7320f944692a770d0a689313a563a429ca1 (diff)
downloadguix-fe409700d85a8de0fadb9cdd052434a4e07b4267.tar.gz
doc: Syntax highlighting now handles @var within @lisp.
* doc/build.scm (syntax-highlighted-html)[build](concatenate-pieces):
Handle @var{name}.
Diffstat (limited to 'doc')
-rw-r--r--doc/build.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/doc/build.scm b/doc/build.scm
index 7256fb9bb5..97f4ab6b83 100644
--- a/doc/build.scm
+++ b/doc/build.scm
@@ -310,6 +310,8 @@ its <pre class=\"lisp\"> blocks (as produced by 'makeinfo --html')."
                    (loop rest (cons (entity->string entity) strings)))
                   ((('span _ lst ...) . rest)     ;for <span class="roman">
                    (loop (append lst rest) strings))
+                  ((('var name) . rest)           ;for @var{name} within @lisp
+                   (loop rest (cons name strings))) ;XXX: losing formatting
                   (something
                    (pk 'unsupported-code-snippet something)
                    (primitive-exit 1)))))