awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-17 13:33:36 -05:00
Code Issues Packages Projects Releases Wiki Activity

Remove/replace references to doom-popup-buffer

Browse Source
This commit is contained in:
Henrik Lissner
2018-01-06 03:27:23 -05:00
parent 4fdf4a58b4
commit b681917082
10 changed files with 14 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
modules/feature/eval/autoload/repl.el
View File

@@ -9,14 +9,14 @@
(if (and +eval-repl-buffer (buffer-live-p +eval-repl-buffer))
(if-let* ((win (get-buffer-window +eval-repl-buffer)))
(select-window win)
(doom-popup-buffer +eval-repl-buffer))
(pop-to-buffer +eval-repl-buffer))
(when command
(let ((repl-buffer (save-window-excursion (call-interactively command))))
(unless (bufferp repl-buffer)
(error "REPL command didn't return a buffer"))
(with-current-buffer repl-buffer (+eval-repl-mode +1))
(setq +eval-repl-buffer repl-buffer)
(select-window (doom-popup-buffer repl-buffer)))))
(pop-to-buffer repl-buffer))))
(when (eq (current-buffer) +eval-repl-buffer)
(goto-char (if (and (derived-mode-p 'comint-mode)
(cdr comint-last-prompt))

3
modules/feature/eval/config.el
View File

@@ -83,6 +83,7 @@ function that creates and returns the REPL buffer."
"Ensures window is scrolled to BOF on invocation."
(with-selected-window (get-buffer-window quickrun--buffer-name)
(goto-char (point-min))
(doom-popup-fit-to-buffer)))
(let ((ignore-window-parameters t))
(shrink-window-if-larger-than-buffer))))
(add-hook 'quickrun-after-run-hook #'+eval|quickrun-scroll-to-bof))