doc: Syntax highlighting now handles @var within @lisp.

* doc/build.scm (syntax-highlighted-html)[build](concatenate-pieces):
Handle @var{name}.

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)))))