From 6dd599e109556a4b23c9106a2058dc2ce059305b Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Sun, 12 Nov 2023 12:26:01 +0100 Subject: [PATCH] Only load bundles if directory bundle/ is true --- init.el | 33 +++++++++++++++++---------------- 1 file changed, 17 insertions(+), 16 deletions(-) diff --git a/init.el b/init.el index b8c06769..5696a383 100755 --- a/init.el +++ b/init.el @@ -1,25 +1,26 @@ (let ((bundle-dir (expand-file-name "~/.emacs.d/bundle/"))) - (if (file-directory-p bundle-dir) - (add-to-list 'load-path bundle-dir) - (make-directory bundle-dir))) + (when (file-directory-p bundle-dir) + (add-to-list 'load-path bundle-dir) + (load "bundle--general") + (load "bundle--gui") + (load "bundle--package") + (load "bundle--lisp") + (load "bundle--irc") + (load "bundle--news") + (load "bundle--calendar") + (load "bundle--email") + (load "bundle--org") + (load "bundle--ux") + (load "bundle--mk") + (load "bundle--linux"))) ;; (require 'server) ;; (or (eq (server-running-p) t) ;; (server-start)) -(load "bundle--general") -(load "bundle--gui") -(load "bundle--package") -(load "bundle--lisp") -(load "bundle--irc") -(load "bundle--news") -(load "bundle--calendar") -(load "bundle--email") -(load "bundle--org") -(load "bundle--ux") -(load "bundle--mk") -(load "bundle--linux") - (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"))