   (interactive
    (list
     (progn (emacspeak-maths-guess-input) ;guess based on context
-    (read-from-minibuffer "LaTeX: "
-                          nil nil nil nil
-                          (emacspeak-maths-input emacspeak-maths)))))
+           (read-from-minibuffer "LaTeX: "
+                                 nil nil nil nil
+                                 (emacspeak-maths-input emacspeak-maths)))))
   (declare (special emacspeak-maths))
   (emacspeak-maths-ensure-server)
   (setf (emacspeak-maths-input emacspeak-maths) latex)

  server-process ; node process handle
  client-buffer ; network socket stream
  client-process ; network connection
  input  ; LaTeX we send 
  output ; where output is displayed
  pause ; pending pause to add
  result

  (declare (special emacspeak-maths-inferior-program
                    emacspeak-maths emacspeak-maths-server-program))
  (let ((server
         (make-comint
          "Server-Maths" emacspeak-maths-inferior-program nil
          emacspeak-maths-server-program))
        (client nil))
    (accept-process-output (get-buffer-process server) 1.0 nil 'just-this-one)
    (setq client
          (open-network-stream "Client-Math" "*Client-Math*" "localhost" 5000))
    (setf emacspeak-maths
          (make-emacspeak-maths
           :output (emacspeak-maths-setup-output)
