emacs.d/init.el

32 lines
883 B
EmacsLisp
Raw Normal View History

(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)))
;; (require 'server)
;; (or (eq (server-running-p) t)
;; (server-start))
2023-10-04 12:22:36 +02:00
(load "bundle--general")
(load "bundle--gui")
2020-08-20 18:47:45 +02:00
(load "bundle--package")
2023-11-09 07:49:03 +01:00
(load "bundle--lisp")
2023-10-04 12:22:36 +02:00
(load "bundle--irc")
(load "bundle--news")
(load "bundle--calendar")
2023-10-04 11:32:38 +02:00
(load "bundle--email")
2022-05-06 19:31:15 +02:00
(load "bundle--org")
2022-10-24 10:18:36 +02:00
(load "bundle--ux")
(load "bundle--mk")
2023-10-04 11:32:38 +02:00
(load "bundle--linux")
2023-10-17 11:03:46 +02:00
(let ((f "~/feeds.el"))
(when (file-exists-p f)
(load-file f)))
2023-10-25 16:59:53 +02:00
2023-10-26 15:01:33 +02:00
(defun mk/wget-mirror-site (url)
"Use wget to mirror a website for offline use. Takes a URL as argument."
(interactive "sEnter the URL to mirror: ")
(let ((cmd (format "wget --mirror --convert-links --adjust-extension --page-requisites --no-parent %s" url)))
(async-shell-command cmd)))