   (when (buffer-live-p (emacspeak-maths-server-buffer emacspeak-maths))
     (kill-buffer (emacspeak-maths-server-buffer emacspeak-maths)))
   (when (buffer-live-p (emacspeak-maths-client-buffer emacspeak-maths))
-    (kill-buffer (emacspeak-maths-client-buffer emacspeak-maths))))
+    (kill-buffer (emacspeak-maths-client-buffer emacspeak-maths)))
+  (when (called-interactively-p 'interactive)
+    (message "Shutdown Maths server and client.")))
 
 (defun emacspeak-maths-ensure-server ()
   "Start up Maths Server bridge if not already running."

      (and emacspeak-maths
           (process-live-p (emacspeak-maths-server-process emacspeak-maths))
           (process-live-p (emacspeak-maths-client-process emacspeak-maths)))
    (emacspeak-maths-bridge-start)))

(defun emacspeak-maths-restart ()
  "Restart Node math-server if running. Otherwise starts a new one."
  (interactive)
  (emacspeak-maths-bridge-shutdown)
  (emacspeak-maths-bridge-start)
  (message "Restarting Maths server and client."))

;;}}}

     "Spoken Math"
     ("SPC" emacspeak-maths-enter "enter")
     ("a" emacspeak-maths-speak-alt "Alt Text")
     ("d" emacspeak-maths-depth "Depth")
     ("r" emacspeak-maths-root "Root")
     ("<up>" emacspeak-maths-up "Up")
     ("<down>" emacspeak-maths-down"down")
