diff --git a/racket-scribble.el b/racket-scribble.el index 363af6c6..5bce1a6b 100644 --- a/racket-scribble.el +++ b/racket-scribble.el @@ -165,12 +165,18 @@ In some cases we resort to returning custom elements for (`(a ((name . ,name)) . ,xs) `(racket-anchor ((name . ,name)) . ,xs)) + ;; Ignore new elements. + (`(span ((class . "button-group")) . ,_) + `(span)) + ;; Replace with or . The ;; former are links to follow using racket-describe-mode, the ;; latter using browse-url (a general-purpose, probably external ;; web browser). (`(a ,_ . ,xs) (pcase (dom-attr dom 'href) + ;; No href. + (`() `(span () ,@(mapcar #'racket--walk-dom xs))) ;; Handle "local-redirect" links. Scribble writes these as ;; external links, and generates doc/local-redirect.js to ;; adjust these on page load. Partially mimic that js here.