Merge branch 'main' of git.sr.ht:~marcuskammer/emacs.d

bundle/bundle--customfile.el

@@ -35,8 +35,7 @@
   ;; (setq ispell-hunspell-dict-paths-alist
   ;;       '(("de_DE_frami" "~/Library/Spelling/de_DE_frami.aff")
   ;;         ("en_US" "/usr/share/hunspell/en_US.aff")))
-
-)
+  )
 
 (when (eq system-type 'windows-nt)
   ;; (add-to-list 'exec-path "C:/msys64/mingw64/bin")

bundle/bundle--news.el

@@ -44,6 +44,7 @@
    ;; lisp / clojure / emacs feeds
    '(;("http://planet.sbcl.org/rss20.xml" sbcl lisp)
      ("https://planet.lisp.org/rss20.xml" planet lisp)
+     ("https://jameshunt.us/feeds/main" lisp blog)
      ("https://xenodium.com/rss.xml" emacs blog)
      ("http://atomized.org/rss.xml" lisp emacs blog)
      ("https://stevelosh.com/rss.xml" lisp blog personal)

bundle/bundle--package.el

@@ -155,21 +155,23 @@
           (concat common-lisp-hyperspec-root "Data/Map_Sym.txt"))
     (setq common-lisp-hyperspec-issuex-table
           (concat common-lisp-hyperspec-root "Data/Map_IssX.txt")))
+
   (if (eq system-type 'windows-nt)
       (setq sbcl-exe "C:\\Program Files\\Steel Bank Common Lisp\\sbcl.exe"
             sbcl-core "C:\\Program Files\\Steel Bank Common Lisp\\sbcl.core"
-            inferior-lisp-program "sbcl"
-            slime-lisp-implementations `((sbcl (,sbcl-exe "--noinform" "--core" ,sbcl-core))))
+            slime-lisp-implementations `((sbcl (,sbcl-exe " --noinform" " --core " ,sbcl-core)))
+            inferior-lisp-program "sbcl")
     (setq inferior-lisp-program "/usr/bin/sbcl --noinform"))
-  (let ((helper (expand-file-name "~/quicklisp/slime-helper.el")))
-    (when (file-exists-p helper) (load-file helper)))
-  (let ((u1
-         (slime-create-filename-translator
-          :machine-instance "u1"
-          :remote-host "u1.metaebene.dev"
-          :username "marcus")))
-    (push u1 slime-filename-translations)))
 
+  (let ((helper (expand-file-name "~/quicklisp/slime-helper.el")))
+    (when (file-exists-p helper)
+      (load-file helper)))
+
+  (let ((u1 (slime-create-filename-translator
+             :machine-instance "u1"
+             :remote-host "u1.metaebene.dev"
+             :username "marcus")))
+    (push u1 slime-filename-translations)))
 
 (use-package simple-httpd
   :defer t)

bundle/custom_win32.el

@@ -19,7 +19,7 @@
  '(org-roam-db-location "~/org-roam.db")
  '(org-roam-directory "d:/visua/Documents/org/")
  '(package-selected-packages
-   '(ox-rss ob-http nim-mode hyperbole jabber kotlin-mode mastodon typescript-mode markdown-mode csv-mode yaml-mode org-roam powershell ox-reveal org-web-tools org-tree-slide elfeed erc-image magit go-translate simple-httpd slime racket-mode web-mode go-mode eglot nov shrface vertico smartparens emojify ace-window olivetti rainbow-delimiters helpful doom-modeline doom-themes all-the-icons-dired all-the-icons use-package))
+   '(htmlize ox-rss ob-http nim-mode hyperbole jabber kotlin-mode mastodon typescript-mode markdown-mode csv-mode yaml-mode org-roam powershell ox-reveal org-web-tools org-tree-slide elfeed erc-image magit go-translate simple-httpd slime racket-mode web-mode go-mode eglot nov shrface vertico smartparens emojify ace-window olivetti rainbow-delimiters helpful doom-modeline doom-themes all-the-icons-dired all-the-icons use-package))
  '(python-shell-interpreter "ipython")
  '(python-shell-interpreter-args "-i --simple-prompt --InteractiveShell.display_page=True")
  '(ring-bell-function 'ignore)