var renamed

README.md

@@ -75,3 +75,4 @@ Adjustable by `M-x customize-option` -> `markdown-preview-port`.
 
 Makes use of `markdown-mode`, which already can transform markdown into html
 and `websocket.el` to deliver html to browser.
+

markdown-preview-mode.el

@@ -42,7 +42,7 @@
   :prefix "markdown-preview-"
   :link '(url-link "https://github.com/ancane/markdown-preview-mode"))
 
-(defcustom markdown-preview-ws-host "localhost"
+(defcustom markdown-preview-host "localhost"
   "Markdown preview websocket server address."
   :group 'markdown-preview
   :type 'string)
@@ -142,7 +142,7 @@ rendered copy to PREVIEW-FILE, ready to be open in browser."
     (if (search-forward "${MD_JS}" nil t)
         (replace-match (markdown-preview--scripts) t))
     (if (search-forward "${WS_HOST}" nil t)
-        (replace-match markdown-preview-ws-host t))
+        (replace-match markdown-preview-host t))
     (if (search-forward "${WS_PORT}" nil t)
         (replace-match (format "%s" markdown-preview-ws-port) t))
     (if (search-forward "${MD_UUID}" nil t)
@@ -230,7 +230,7 @@ rendered copy to PREVIEW-FILE, ready to be open in browser."
     (setq markdown-preview--websocket-server
           (websocket-server
            markdown-preview-ws-port
-           :host markdown-preview-ws-host
+           :host markdown-preview-host
            :on-message (lambda (websocket frame)
                          (let ((ws-frame-text (websocket-frame-payload frame)))
                            (if (string-prefix-p "MDPM-Register-UUID: " ws-frame-text)
@@ -243,7 +243,7 @@ rendered copy to PREVIEW-FILE, ready to be open in browser."
                                 frame))
                              )))
            :on-open (lambda (websocket) (message "Websocket opened"))
-           :on-error (lambda (websocket type err) (message (concat "====> Error:" err)))
+           :on-error (lambda (websocket type err) (message (format "====> Error: %s" err)))
            :on-close (lambda (websocket) (markdown-preview--drop-closed-clients))))
     (add-hook 'kill-emacs-hook 'markdown-preview--stop-websocket-server))
   (markdown-preview--open-browser-preview))
@@ -253,7 +253,7 @@ rendered copy to PREVIEW-FILE, ready to be open in browser."
   (when (not markdown-preview--local-client)
     (setq markdown-preview--local-client
           (websocket-open
-           (format "ws://%s:%d" markdown-preview-ws-host markdown-preview-ws-port)
+           (format "ws://%s:%d" markdown-preview-host markdown-preview-ws-port)
            :on-error (lambda (ws type err)
                        (message "error connecting"))
            :on-close (lambda (websocket)
@@ -277,6 +277,7 @@ rendered copy to PREVIEW-FILE, ready to be open in browser."
     (let ((md-buffer (gethash preview-uuid markdown-preview--preview-buffers)))
       (when md-buffer
         (with-current-buffer md-buffer
+
           (markdown markdown-output-buffer-name))))
 
     (with-current-buffer markdown-output-buffer-name ;; get-buffer