Fix wrong case statement to check server start
This commit is contained in:
parent
e892a849c1
commit
bc5df22b55
4
init.el
4
init.el
|
@ -303,9 +303,9 @@
|
|||
server-file)
|
||||
|
||||
(server-start)
|
||||
(cl-ecase (server-running-p)
|
||||
(cl-case (server-running-p)
|
||||
((t) t) ; server is running
|
||||
(nil (warn "Server not running, check logs and restart manually."))
|
||||
((nil) (warn "Server not running, check logs and restart manually."))
|
||||
(t (warn "`server-running-p' returned neither nil nor t. Check and restart server manually if required."))))))
|
||||
|
||||
;; Load custom code
|
||||
|
|
Loading…
Reference in New Issue