(let ((bundle-dir (expand-file-name "~/.emacs.d/bundle/"))) (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)) (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"))