fix: Don't autoload ielm'

This commit is contained in:
Madeleine Sydney
2025-01-30 04:47:58 -07:00
parent d6c5e321c8
commit d4c686ab65
2 changed files with 4 additions and 18 deletions

View File

@@ -92,7 +92,6 @@ to this commmand."
:around #'doom-popup--dont-select-me-a))
;;;###package compile
(with-eval-after-load 'compile
(defun doom-popup--compilation-goto-locus-a (fn &rest args)
(cl-letf ((pop-to-buffer (symbol-function #'pop-to-buffer)))
@@ -107,7 +106,6 @@ to this commmand."
:around #'doom-popup--compilation-goto-locus-a))
;;;###package eshell
(with-eval-after-load 'eshell
(setq eshell-destroy-buffer-when-process-dies t)
@@ -123,7 +121,6 @@ to this commmand."
(advice-add #'eshell-exec-visual
:around #'doom-popup--eshell-undedicate-popup))
;;;###package evil
(with-eval-after-load 'evil
(defun doom-popup--evil-command-window-execute-a nil
"Execute the command under the cursor in the appropriate buffer, rather than
@@ -193,7 +190,6 @@ the command buffer."
(doom-popup--switch-from-popup (find-function-search-for-symbol fun 'defface file)))))
;;;###package helpful
(with-eval-after-load 'helpful
(defadvice! doom-popup--helpful-open-in-origin-window-a (button)
"Open links in non-popup, originating window rather than helpful's window."
@@ -211,8 +207,6 @@ the command buffer."
(select-window origin))))
;;;###package helm
;;;###package helm-ag
(with-eval-after-load 'helm
(setq helm-default-display-buffer-functions '(doom-popup-display-buffer-stacked-side-window-fn))
@@ -243,7 +237,6 @@ the command buffer."
(delete-window win)))))
;;;###package Info
(with-eval-after-load 'Info
(defadvice! doom-popup--switch-to-info-window-a (&rest _)
:after #'info-lookup-symbol
@@ -252,7 +245,6 @@ the command buffer."
(select-window win)))))
;;;###package latex
(with-eval-after-load 'latex
(defadvice! doom-popup--use-popup-window-for-reftex-citation-a (fn &rest args)
:around #'reftex-do-citation
@@ -354,7 +346,6 @@ Ugh, such an ugly hack."
(advice-add #'org-edit-src-exit
:around #'doom-popup--org-edit-src-exit-a))
;;;###package org-journal
(with-eval-after-load 'org-journal
(defadvice! doom-popup--use-popup-window-a (fn &rest args)
:around #'org-journal--search-by-string
@@ -362,7 +353,6 @@ Ugh, such an ugly hack."
(apply fn args))))
;;;###package persp-mode
(with-eval-after-load 'persp-mode
(defadvice! doom-popup--persp-mode-restore-popups-a (&rest _)
"Restore popup windows when loading a perspective from file."
@@ -386,7 +376,6 @@ Ugh, such an ugly hack."
(inhibit-same-window . t))))
;;;###package profiler
(with-eval-after-load 'profiler
(defadvice! doom-popup--profiler-report-find-entry-in-other-window-a (fn function)
:around #'profiler-report-find-entry
@@ -394,7 +383,6 @@ Ugh, such an ugly hack."
(funcall fn function))))
;;;###package undo-tree
(with-eval-after-load 'undo-tree
(defadvice! doom-popup--use-popup-window-for-undo-tree-visualizer-a (fn &rest args)
"TODO"
@@ -404,13 +392,11 @@ Ugh, such an ugly hack."
(letf! ((#'switch-to-buffer-other-window #'pop-to-buffer))
(apply fn args)))))
;;;###package wdired
(with-eval-after-load 'wdired
;; close the popup after you're done with a wdired buffer
(advice-add #'wdired-abort-changes :after #'doom-popup-close-a)
(advice-add #'wdired-finish-edit :after #'doom-popup-close-a))
;;;###package wgrep
(with-eval-after-load 'wgrep
;; close the popup after you're done with a wgrep buffer
(advice-add #'wgrep-abort-changes :after #'doom-popup-close-a)
@@ -433,7 +419,6 @@ Ugh, such an ugly hack."
(which-key--show-buffer-side-window act-popup-dim))))))
;;;###package windmove
;; Users should be able to hop into popups easily, but Elisp shouldn't.
(with-eval-after-load 'windmove
(defun doom-popup--ignore-window-parameters-a (fn &rest args)

View File

@@ -2,9 +2,10 @@
(require 'syd-handle-repl)
(use-package ielm
:commands ielm
:hook (emacs-lisp-mode)
;; Don't `use-package' `ielm', since it's loaded by Emacs. You'll get weird
;; autoload errors if you do.
;; https://www.reddit.com/r/emacs/comments/q7fjbi/comment/lml127d
(use-package emacs
:custom ((ielm-history-file-name ; Stay out of my config dir!
(file-name-concat syd-cache-dir "ielm-history.eld"))))