     (current-buffer)))
 
 ;;}}}
+;;{{{ Helpers:
+
+(defun emacspeak-maths-speak-alt ()
+  "Speak alt text as Maths.
+For use on Wikipedia pages  for example."
+  (interactive)
+  (cl-assert (eq major-mode 'eww-mode) "Not in an EWW buffer.")
+  (let ((alt-text (shr-show-alt-text)))
+    (unless (string-equal alt-text "No image under point")
+  (funcall-interactively #'emacspeak-maths-enter alt-text))))
+
+;;}}}
 ;;{{{ Muggle: Speak And Browse Math
+
 (global-set-key
  (kbd "s-SPC")
  (defhydra emacspeak-maths-navigator

              :post emacspeak-muggles-post)
   "Spoken Math"
   ("SPC" emacspeak-maths-enter "enter")
   ("<up>" emacspeak-maths-up "Up")
   ("<down>" emacspeak-maths-down"down")
   ("<left>" emacspeak-maths-left "left")

;;; Now you can use these keys:
;;;@itemize
;;; @item Enter: <SPC> Enter a LaTeX expression.
;;; @item Alt-Text <a> Process alt-text under point as LaTeX.
;;; @item Down <down> Move down a level.
;;; @item Up <up> Move up a level.
;;; @item Left <left> Move left.
