Load server at first

This commit is contained in:
Marcus Kammer 2023-12-27 14:05:11 +01:00
parent afa489b550
commit bcca4dc342
Signed by: marcuskammer
GPG key ID: C374817BE285268F

15
init.el
View file

@ -1,3 +1,7 @@
(require 'server)
(or (eq (server-running-p) t)
(server-start))
(let ((bundle-dir (expand-file-name "~/.emacs.d/bundle/")))
(when (file-directory-p bundle-dir)
(add-to-list 'load-path bundle-dir)
@ -13,14 +17,3 @@
(load "bundle--ux")
(load "bundle--mk")
(load "bundle--linux")))
;; (require 'server)
;; (or (eq (server-running-p) t)
;; (server-start))
(let ((f "~/feeds.el"))
(when (file-exists-p f)
(load-file f)))
(unless (file-directory-p "~/cl-sites/")
(async-shell-command "git clone git@git.sr.ht:~marcuskammer/cl-sites ~/cl-sites"))