preview url var
This commit is contained in:
@@ -36,10 +36,10 @@
|
||||
(defvar mdpm:websocket-server nil)
|
||||
(defvar mdpm:local-client nil)
|
||||
(defvar mdpm:remote-clients nil)
|
||||
(defvar mdpm:directory (file-name-directory load-file-name))
|
||||
(defvar mdpm:preview-url (concat (file-name-directory load-file-name) "preview.html"))
|
||||
|
||||
(defun mdpm:open-browser-preview ()
|
||||
(browse-url (concat mdpm:directory "preview.html")))
|
||||
(browse-url mdpm:preview-url))
|
||||
|
||||
(defun mdpm:stop-websocket-server ()
|
||||
(when mdpm:local-client
|
||||
|
||||
Reference in New Issue
Block a user