 
 (defcustom emacspeak-maths-inferior-program
   (or (executable-find "node")
+      ;; TODO: This is very fragile. Rewrite with nvm current.
       (expand-file-name "~/.nvm/versions/node/v6.4.0/bin/node"))
   "Location of `node' executable.
 Default value uses the version of `node' set configured via NVM."

(defun emacspeak-maths-start ()
  "Start Node math-server, and connect to it."
  (interactive)
  (declare (special emacspeak-maths-inferior-program
                    emacspeak-maths emacspeak-maths-server-program))
  (let ((server


(cl-loop
 for move in
 '("left" "right" "up" "down" "root" "depth")
 do
 (eval
  `(defun ,(intern (format "emacspeak-maths-%s" move)) ()
