Emacs: Server: Move conditions into use-package block.

This commit is contained in:
tastytea 2020-11-29 13:41:14 +01:00
parent 5253f22d7b
commit b0c80b14be
1 changed files with 30 additions and 29 deletions

View File

@ -1,6 +1,6 @@
;;; server.el --- Set up network stuff.. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-11-29T10:32:03+0100>
;; Time-stamp: <2020-11-29T13:41:06+0100>
;;; Commentary:
@ -37,10 +37,11 @@
;; - Our EUID is not 0,
;; - We are not logged in via SSH,
;; - It is not already running.
(when (not (or (equal (user-real-uid) 0)
(getenv "SSH_CONNECTION")))
(use-package server
:straight (:type built-in)
:defer 2
:if (not (or (equal (user-real-uid) 0)
(getenv "SSH_CONNECTION")))
:functions (server-running-p)
:init (setq
server-use-tcp t
@ -66,7 +67,7 @@
("^gitlab\\.com$" . gfm-mode)
("^gitlab\\.gnome\\.org$" . gfm-mode)))
(atomic-chrome-buffer-open-style 'frame))
:hook (atomic-chrome-edit-mode . (lambda () (set-fill-column 400)))))
:hook (atomic-chrome-edit-mode . (lambda () (set-fill-column 400))))
(provide 'net/server)
;;; server.el ends here