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

* doc/build.scm (syntax-highlighted-html)[build](concatenate-pieces): Handle @var{name}.
2020-09-04 10:32:04 +02:00 · 2020-09-04 10:32:04 +02:00 · fe409700d8
commit fe409700d8
parent 720fd7320f
1 changed files with 2 additions and 0 deletions
--- 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)))))