This commit is contained in:
Igor Shymko 2016-08-30 12:19:08 +03:00
parent 639f76437c
commit 25f1de2839
1 changed files with 2 additions and 2 deletions

View File

@ -110,7 +110,7 @@
(setq markdown-preview--websocket-server (setq markdown-preview--websocket-server
(websocket-server (websocket-server
markdown-preview-port markdown-preview-port
:host markdown-preview-host :host markdown-preview-host
:on-message (lambda (websocket frame) :on-message (lambda (websocket frame)
(mapc (lambda (ws) (websocket-send ws frame)) (mapc (lambda (ws) (websocket-send ws frame))
markdown-preview--remote-clients)) markdown-preview--remote-clients))
@ -178,7 +178,7 @@
(markdown-preview--stop-idle-timer) (markdown-preview--stop-idle-timer)
(let ((preview-file (concat (file-name-directory (buffer-file-name)) markdown-preview-file-name))) (let ((preview-file (concat (file-name-directory (buffer-file-name)) markdown-preview-file-name)))
(if (file-exists-p preview-file) (if (file-exists-p preview-file)
(delete-file preview-file))) (delete-file preview-file)))
) )
;;;###autoload ;;;###autoload