Some changes to init file to increase loading speed

This commit is contained in:
Marcus Kammer 2024-09-23 17:38:18 +02:00
parent c861e4ffe6
commit 14ac803fcf

197
init.el
View file

@ -1,4 +1,5 @@
(setq package-quickstart t)
(setq gc-cons-threshold 100000000)
(add-hook 'after-init-hook (lambda () (setq gc-cons-threshold 800000)))
;; (add-hook 'emacs-startup-hook
;; (lambda ()
@ -462,6 +463,7 @@
(require 'shrface))
(use-package nov
:defer t
:hook ((nov-mode . visual-line-mode)
(nov-mode . mk/nov-font-settings))
:mode ("\\.epub\\'" . nov-mode)
@ -487,6 +489,7 @@
(use-package sql
:defer t
:config
(setq sql-connection-alist
'((finance-db
@ -616,6 +619,7 @@
:render (gt-buffer-render))))
(use-package magit
:defer t
:bind ("C-x g" . magit-status)
:init
(when (eq system-type 'windows-nt)
@ -1244,100 +1248,101 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
(use-package elfeed
:bind ("C-x w" . elfeed)
:init
(setq elfeed-feeds
'(("https://netzpolitik.org/feed/" netz politik news)
("https://www.marcuskammer.dev/weblog/index.xml" personal)
("https://www.guyrutenberg.com/feed/" linux blog)
("https://blog.mozilla.org/en/feed/" browser web)
("https://blog.chromium.org/feeds/posts/default" browser web)
("https://hacks.mozilla.org/feed/" browser web)
("https://mailbox.org/share/feed-de-mailbox.xml" email mailbox web)
("https://feeds.feedburner.com/GoogleWebFonts" fonts blog google)
("https://twobithistory.org/feed.xml" history blog coding)
("https://blog.getbootstrap.com/feed.xml" web bootstrap blog)
("https://blog.mozilla.org/en/feed/" web firefox blog)
("https://fsfe.org/news/news.de.rss" fsfe news free-software)
("https://planet.lisp.org/rss20.xml" planet lisp)
("https://emacsconf.org/index.atom" emacs lisp conference)
("https://jameshunt.us/feeds/main" lisp blog)
("https://xenodium.com/rss.xml" emacs blog)
("https://stevelosh.com/rss.xml" lisp blog personal)
("https://planet.lisp.org/rss20.xml" lisp blogs)
("https://m-x-erlangen.gitlab.io/atom.xml" lisp meetup)
("https://takeonrules.com/index.atom" lisp emacs blog)
("https://emacsredux.com/atom.xml" emacs blog)
("https://planet.emacslife.com/atom.xml" emacs)
("https://yiming.dev/rss.xml" coding emacs lisp blog)
("https://endlessparentheses.com/atom.xml" emacs elisp blog)
("https://www.philnewton.net/blog/feed/" emacs blog)
("https://emacsredux.com/atom.xml" emacs blog)
("https://marcus3santos.github.io/index.xml" emacs blog)
("https://olddeuteronomy.github.io/index.xml" emacs blog)
("https://www.colinmclear.net/posts/index.xml" research emacs blog)
("https://howardism.org/index.xml" emacs blog)
("https://www.timmons.dev/rss.xml" lisp blog)
("https://batsov.com/atom.xml" lisp emacs blog)
("https://notes.eatonphil.com/rss.xml" lisp emacs blog)
("https://stackoverflow.com/feeds/tag?tagnames=hunchentoot&sort=newest" lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=common-lisp&sort=newest" lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=elisp&sort=newest" lisp emacs stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=org-mode&sort=newest" emacs orgmode stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=xmpp&sort=newest" xmpp stackoverflow)
;;("https://stackoverflow.com/feeds/tag?tagnames=postgresql&sort=newest" sql stackoverflow)
;;("https://stackoverflow.com/feeds/tag?tagnames=mariadb&sort=newest" sql stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=guile&sort=newest" guile scheme lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=sbcl&sort=newest" sbcl lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=sbcl+emacs&sort=newest" sbcl emacs lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=sbcl+common-lisp+linux&sort=newest" sbcl lisp linux stackoverflow)
("https://sourceforge.net/p/sbcl/activity/feed" lisp sbcl)
("https://fukamachi.hashnode.dev/rss.xml" lisp blog)
("https://sourceforge.net/projects/sbcl/rss?path=/sbcl" lisp sbcl sourceforge)
("https://threatpost.com/feed/" security)
("https://krebsonsecurity.com/feed/" security blog)
("https://www.schneier.com/feed/atom/" security blog)
("https://www.nngroup.com/feed/rss/" ux design)
("https://feedpress.me/UXmatters" ux design)
("https://uxmovement.com/feed" ux design)
("https://www.uxbeginner.com/feed/" ux design)
("https://jeffgothelf.com/feed/" lean ux design blog)
("https://uxwritinghub.com/feed/" ux writing blog)
("https://www.w3.org/WAI/feed.xml" ux wai aria w3c)
("https://measuringu.com/feed/" ux blog)
("https://ux.stackexchange.com/feeds" ux stackexchange)
("https://emacs.stackexchange.com/feeds" emacs stackexchange)
("https://www.mdr.de/nachrichten/podcast/general/russland-angriff-krieg-ukraine100-podcast.xml" krieg ukraine podcast)
("https://www.deutschlandfunk.de/umwelt-und-verbraucher-100.rss" umwelt verbraucher klima podcast)
("https://jung-naiv.podigee.io/feed/mp3" politik podcast)
("https://www.ndr.de/nachrichten/info/podcast4696.xml" podcast umwelt klima)
("https://ct-uplink.podigee.io/feed/mp3" podcast technik computer)
("https://feeds.soundcloud.com/users/soundcloud:users:261098918/sounds.rss" podcast osint)
("https://hacks.mozilla.org/feed/" blog firefox web)
("https://karthinks.com/index.xml" blog emacs)
("https://www.destatis.de/SiteGlobals/Functions/RSSFeed/DE/RSSNewsfeed/Aktuell.xml" destatis aktuelles presse)
("http://www.umweltbundesamt.de/rss/presse" uba aktuelles presse)
("https://www.test.de/rss/geldanlage-banken/" test geld finanzen)
("https://www.test.de/rss/steuern-recht/" test steuern recht)
("https://thefetishistas.com/feed/" latex fetish news)
("https://tonsky.me/atom.xml" blog computer)
("https://www.copernicus.eu/news/rss" klima)
("https://gegenblende.dgb.de/@@rss?count=10&feed=b3b8f76e-53f1-11e6-a380-525400e5a74a" arbeit gewerkschaft news)
("https://drewdevault.com/blog/index.xml" blog programming computer)
("https://inkppl.com/en/rss.xml" tattoo magazin people culture)
("https://novaramedia.com/feed/" politics capitalism climate left media)
("https://www.youtube.com/feeds/videos.xml?channel_id=UCN29LJGZ8FY30ysxdTnDsaw" youtube video)
("https://www.youtube.com/feeds/videos.xml?channel_id=UC5Ghe5TBQGYIOANuiNW4hDQ" youtube video)
("https://www.youtube.com/feeds/videos.xml?channel_id=UC0p5jTq6Xx_DosDFxVXnWaQ" youtube video)
("https://www.youtube.com/feeds/videos.xml?channel_id=UC0p5jTq6Xx_DosDFxVXnWaQ" youtube video)
("https://www.vag.de/rss/meldungen" ubahn opnv vag)
("https://feeds.feedblitz.com/sethsblog" management author blog)
("https://ourworldindata.org/atom-data-insights.xml" data world)
("https://ourworldindata.org/atom.xml" data world)
("https://www.amazon.science/index.rss" science blog amazon data)
("https://feed.theregister.com/atom?a=Liam%20Proven" register foss)
("https://benswift.me/feed.xml" blog creative technology emacs computing)
))
(setq elfeed-search-filter "@7-day-ago +unread")
:init (setq elfeed-feeds
'(("https://netzpolitik.org/feed/" netz politik news)
("https://www.marcuskammer.dev/weblog/index.xml" personal)
("https://www.guyrutenberg.com/feed/" linux blog)
("https://blog.mozilla.org/en/feed/" browser web)
("https://blog.chromium.org/feeds/posts/default" browser web)
("https://hacks.mozilla.org/feed/" browser web)
("https://mailbox.org/share/feed-de-mailbox.xml" email mailbox web)
("https://feeds.feedburner.com/GoogleWebFonts" fonts blog google)
("https://twobithistory.org/feed.xml" history blog coding)
("https://blog.getbootstrap.com/feed.xml" web bootstrap blog)
("https://blog.mozilla.org/en/feed/" web firefox blog)
("https://fsfe.org/news/news.de.rss" fsfe news free-software)
("https://planet.lisp.org/rss20.xml" planet lisp)
("https://emacsconf.org/index.atom" emacs lisp conference)
("https://jameshunt.us/feeds/main" lisp blog)
("https://xenodium.com/rss.xml" emacs blog)
("https://stevelosh.com/rss.xml" lisp blog personal)
("https://planet.lisp.org/rss20.xml" lisp blogs)
("https://m-x-erlangen.gitlab.io/atom.xml" lisp meetup)
("https://takeonrules.com/index.atom" lisp emacs blog)
("https://emacsredux.com/atom.xml" emacs blog)
("https://planet.emacslife.com/atom.xml" emacs)
("https://yiming.dev/rss.xml" coding emacs lisp blog)
("https://endlessparentheses.com/atom.xml" emacs elisp blog)
("https://www.philnewton.net/blog/feed/" emacs blog)
("https://emacsredux.com/atom.xml" emacs blog)
("https://marcus3santos.github.io/index.xml" emacs blog)
("https://olddeuteronomy.github.io/index.xml" emacs blog)
("https://www.colinmclear.net/posts/index.xml" research emacs blog)
("https://howardism.org/index.xml" emacs blog)
("https://www.timmons.dev/rss.xml" lisp blog)
("https://batsov.com/atom.xml" lisp emacs blog)
("https://notes.eatonphil.com/rss.xml" lisp emacs blog)
("https://stackoverflow.com/feeds/tag?tagnames=hunchentoot&sort=newest" lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=common-lisp&sort=newest" lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=elisp&sort=newest" lisp emacs stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=org-mode&sort=newest" emacs orgmode stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=xmpp&sort=newest" xmpp stackoverflow)
;;("https://stackoverflow.com/feeds/tag?tagnames=postgresql&sort=newest" sql stackoverflow)
;;("https://stackoverflow.com/feeds/tag?tagnames=mariadb&sort=newest" sql stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=guile&sort=newest" guile scheme lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=sbcl&sort=newest" sbcl lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=sbcl+emacs&sort=newest" sbcl emacs lisp stackoverflow)
("https://stackoverflow.com/feeds/tag?tagnames=sbcl+common-lisp+linux&sort=newest" sbcl lisp linux stackoverflow)
("https://sourceforge.net/p/sbcl/activity/feed" lisp sbcl)
("https://fukamachi.hashnode.dev/rss.xml" lisp blog)
("https://sourceforge.net/projects/sbcl/rss?path=/sbcl" lisp sbcl sourceforge)
("https://threatpost.com/feed/" security)
("https://krebsonsecurity.com/feed/" security blog)
("https://www.schneier.com/feed/atom/" security blog)
("https://www.nngroup.com/feed/rss/" ux design)
("https://feedpress.me/UXmatters" ux design)
("https://uxmovement.com/feed" ux design)
("https://www.uxbeginner.com/feed/" ux design)
("https://jeffgothelf.com/feed/" lean ux design blog)
("https://uxwritinghub.com/feed/" ux writing blog)
("https://www.w3.org/WAI/feed.xml" ux wai aria w3c)
("https://measuringu.com/feed/" ux blog)
("https://ux.stackexchange.com/feeds" ux stackexchange)
("https://emacs.stackexchange.com/feeds" emacs stackexchange)
("https://www.mdr.de/nachrichten/podcast/general/russland-angriff-krieg-ukraine100-podcast.xml" krieg ukraine podcast)
("https://www.deutschlandfunk.de/umwelt-und-verbraucher-100.rss" umwelt verbraucher klima podcast)
("https://jung-naiv.podigee.io/feed/mp3" politik podcast)
("https://www.ndr.de/nachrichten/info/podcast4696.xml" podcast umwelt klima)
("https://ct-uplink.podigee.io/feed/mp3" podcast technik computer)
("https://feeds.soundcloud.com/users/soundcloud:users:261098918/sounds.rss" podcast osint)
("https://hacks.mozilla.org/feed/" blog firefox web)
("https://karthinks.com/index.xml" blog emacs)
("https://www.destatis.de/SiteGlobals/Functions/RSSFeed/DE/RSSNewsfeed/Aktuell.xml" destatis aktuelles presse)
("http://www.umweltbundesamt.de/rss/presse" uba aktuelles presse)
("https://www.test.de/rss/geldanlage-banken/" test geld finanzen)
("https://www.test.de/rss/steuern-recht/" test steuern recht)
("https://thefetishistas.com/feed/" latex fetish news)
("https://tonsky.me/atom.xml" blog computer)
("https://www.copernicus.eu/news/rss" klima)
("https://gegenblende.dgb.de/@@rss?count=10&feed=b3b8f76e-53f1-11e6-a380-525400e5a74a" arbeit gewerkschaft news)
("https://drewdevault.com/blog/index.xml" blog programming computer)
("https://inkppl.com/en/rss.xml" tattoo magazin people culture)
("https://novaramedia.com/feed/" politics capitalism climate left media)
("https://www.youtube.com/feeds/videos.xml?channel_id=UCN29LJGZ8FY30ysxdTnDsaw" youtube video)
("https://www.youtube.com/feeds/videos.xml?channel_id=UC5Ghe5TBQGYIOANuiNW4hDQ" youtube video)
("https://www.youtube.com/feeds/videos.xml?channel_id=UC0p5jTq6Xx_DosDFxVXnWaQ" youtube video)
("https://www.youtube.com/feeds/videos.xml?channel_id=UC0p5jTq6Xx_DosDFxVXnWaQ" youtube video)
("https://www.vag.de/rss/meldungen" ubahn opnv vag)
("https://feeds.feedblitz.com/sethsblog" management author blog)
("https://ourworldindata.org/atom-data-insights.xml" data world)
("https://ourworldindata.org/atom.xml" data world)
("https://www.amazon.science/index.rss" science blog amazon data)
("https://feed.theregister.com/atom?a=Liam%20Proven" register foss)
("https://benswift.me/feed.xml" blog creative technology emacs computing)
))
:custom
(elfeed-search-filter "@7-day-ago +unread")
:config
(let ((feeds (expand-file-name "~/feeds.el")))
(when (file-exists-p feeds)
(load-file feeds))))
@ -1655,6 +1660,7 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
("columns" "fullflexible")))
(org-latex-inputenc-alist '((\"utf8\" . \"utf8x\")))
:config
(add-to-list 'org-file-apps '("\\.pdf\\'" . emacs))
(if (eq system-type 'windows-nt)
(setq org-babel-python-command "python")
(setq org-babel-python-command "python3"))
@ -1943,6 +1949,7 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
(require 'request)
(use-package org-roam
:defer t
:after org
:init
(setq org-roam-db-autosync-mode t)