Run server even if server-running-p is "other".

This commit is contained in:
tastytea 2019-05-01 14:36:37 +02:00
parent 8f8884af91
commit 85556d799e
2 changed files with 7 additions and 6 deletions

11
init.el
View File

@ -1,5 +1,5 @@
;;; init.el --- tastytea's Emacs init file.
;; Time-stamp: <2019-04-30T11:50:11+00:00>
;; Time-stamp: <2019-05-01T12:41:33+00:00>
;;; Commentary:
;; I am using this file with Emacs 26, but most of it will probably work with
@ -556,9 +556,10 @@ With argument, do this that many times."
"Show tabbar if it is hidden."
(when tabbar-ruler-tabbar-off
(tabbar-mode 1)
(setq-local tabbar-ruler-tabbar-off nil)
(setq tabbar-ruler-tabbar-off nil)
(ruler-mode -1)
(setq-local tabbar-ruler-ruler-off t)))
(setq tabbar-ruler-ruler-off 't)
))
;; Show tabbar after 2 seconds idle.
(run-with-idle-timer 2 t (lambda () (my/show-tabbar)))
@ -904,8 +905,8 @@ With argument, do this that many times."
server-auth-key ; 64 chars, saved in ~/.emacs.d/server/server.
"phahw2ohVoh0oopheish7IVie9desh8aequeenei3uo8wahShe%thuadaeNa4ieh")
:config
(unless (server-running-p)
(server-start))
(if (not (eq (server-running-p) t)) ; Run server if not t.
(server-start))
)))
;; Set garbage collection threshold to original value.

View File

@ -1,2 +1,2 @@
127.0.0.1:51313 30434
127.0.0.1:51313 28970
phahw2ohVoh0oopheish7IVie9desh8aequeenei3uo8wahShe%thuadaeNa4ieh