Remove/replace references to doom-popup-buffer
This commit is contained in:
parent
4fdf4a58b4
commit
b681917082
10 changed files with 14 additions and 24 deletions
|
@ -31,9 +31,8 @@ PROMPT (a string) and COMMAND (a list of command plists; see `def-menu!').")
|
||||||
(setq header-line-format
|
(setq header-line-format
|
||||||
(concat (propertize "$ " 'face 'font-lock-doc-face)
|
(concat (propertize "$ " 'face 'font-lock-doc-face)
|
||||||
(propertize command 'face 'font-lock-preprocessor-face)))
|
(propertize command 'face 'font-lock-preprocessor-face)))
|
||||||
(doom-resize-window
|
(doom-resize-window (get-buffer-window (pop-to-buffer (current-buffer)))
|
||||||
(doom-popup-buffer (current-buffer)
|
12)))
|
||||||
'(:autokill t :autoclose t)) 12)))
|
|
||||||
((or (symbolp command)
|
((or (symbolp command)
|
||||||
(functionp command))
|
(functionp command))
|
||||||
(call-interactively command))
|
(call-interactively command))
|
||||||
|
|
|
@ -66,8 +66,8 @@ interactive session."
|
||||||
(insert "\n")
|
(insert "\n")
|
||||||
(setq end (point))
|
(setq end (point))
|
||||||
(ansi-color-apply-on-region beg end)))
|
(ansi-color-apply-on-region beg end)))
|
||||||
(with-selected-window (doom-popup-buffer buf)
|
(pop-to-buffer buf)
|
||||||
(goto-char (point-max))))))
|
(goto-char (point-max)))))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defmacro debug! (message &rest args)
|
(defmacro debug! (message &rest args)
|
||||||
|
|
|
@ -64,8 +64,8 @@
|
||||||
(switch-to-buffer +regex--text-buffer)
|
(switch-to-buffer +regex--text-buffer)
|
||||||
(with-current-buffer +regex--text-buffer
|
(with-current-buffer +regex--text-buffer
|
||||||
(insert +regex-dummy-text)))
|
(insert +regex-dummy-text)))
|
||||||
(doom-popup-buffer +regex--groups-buffer)
|
(pop-to-buffer +regex--groups-buffer)
|
||||||
(doom-popup-buffer +regex--expr-buffer)
|
(pop-to-buffer +regex--expr-buffer)
|
||||||
(with-current-buffer +regex--expr-buffer
|
(with-current-buffer +regex--expr-buffer
|
||||||
(conf-mode)
|
(conf-mode)
|
||||||
(rainbow-delimiters-mode +1)
|
(rainbow-delimiters-mode +1)
|
||||||
|
|
|
@ -33,16 +33,6 @@
|
||||||
(kill-buffer buff)
|
(kill-buffer buff)
|
||||||
(delete-window window)))
|
(delete-window window)))
|
||||||
|
|
||||||
;;;###autoload
|
|
||||||
(defun +rss-popup-pane (buf)
|
|
||||||
"Display BUF in a popup."
|
|
||||||
(doom-popup-buffer buf
|
|
||||||
'(:align +rss-split-direction
|
|
||||||
:size 0.75
|
|
||||||
:select t
|
|
||||||
:autokill t
|
|
||||||
:autoclose t)))
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +rss/open (entry)
|
(defun +rss/open (entry)
|
||||||
"Display the currently selected item in a buffer."
|
"Display the currently selected item in a buffer."
|
||||||
|
|
|
@ -21,7 +21,7 @@
|
||||||
(setq elfeed-search-filter "@2-week-ago "
|
(setq elfeed-search-filter "@2-week-ago "
|
||||||
elfeed-db-directory (concat doom-local-dir "elfeed/db/")
|
elfeed-db-directory (concat doom-local-dir "elfeed/db/")
|
||||||
elfeed-enclosure-default-dir (concat doom-local-dir "elfeed/enclosures/")
|
elfeed-enclosure-default-dir (concat doom-local-dir "elfeed/enclosures/")
|
||||||
elfeed-show-entry-switch #'+rss-popup-pane
|
elfeed-show-entry-switch #'pop-to-buffer
|
||||||
elfeed-show-entry-delete #'+rss/delete-pane
|
elfeed-show-entry-delete #'+rss/delete-pane
|
||||||
shr-max-image-proportion 0.6)
|
shr-max-image-proportion 0.6)
|
||||||
|
|
||||||
|
|
|
@ -9,14 +9,14 @@
|
||||||
(if (and +eval-repl-buffer (buffer-live-p +eval-repl-buffer))
|
(if (and +eval-repl-buffer (buffer-live-p +eval-repl-buffer))
|
||||||
(if-let* ((win (get-buffer-window +eval-repl-buffer)))
|
(if-let* ((win (get-buffer-window +eval-repl-buffer)))
|
||||||
(select-window win)
|
(select-window win)
|
||||||
(doom-popup-buffer +eval-repl-buffer))
|
(pop-to-buffer +eval-repl-buffer))
|
||||||
(when command
|
(when command
|
||||||
(let ((repl-buffer (save-window-excursion (call-interactively command))))
|
(let ((repl-buffer (save-window-excursion (call-interactively command))))
|
||||||
(unless (bufferp repl-buffer)
|
(unless (bufferp repl-buffer)
|
||||||
(error "REPL command didn't return a buffer"))
|
(error "REPL command didn't return a buffer"))
|
||||||
(with-current-buffer repl-buffer (+eval-repl-mode +1))
|
(with-current-buffer repl-buffer (+eval-repl-mode +1))
|
||||||
(setq +eval-repl-buffer repl-buffer)
|
(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)
|
(when (eq (current-buffer) +eval-repl-buffer)
|
||||||
(goto-char (if (and (derived-mode-p 'comint-mode)
|
(goto-char (if (and (derived-mode-p 'comint-mode)
|
||||||
(cdr comint-last-prompt))
|
(cdr comint-last-prompt))
|
||||||
|
|
|
@ -83,6 +83,7 @@ function that creates and returns the REPL buffer."
|
||||||
"Ensures window is scrolled to BOF on invocation."
|
"Ensures window is scrolled to BOF on invocation."
|
||||||
(with-selected-window (get-buffer-window quickrun--buffer-name)
|
(with-selected-window (get-buffer-window quickrun--buffer-name)
|
||||||
(goto-char (point-min))
|
(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))
|
(add-hook 'quickrun-after-run-hook #'+eval|quickrun-scroll-to-bof))
|
||||||
|
|
||||||
|
|
|
@ -28,7 +28,7 @@
|
||||||
(let ((buf (get-buffer-create +eshell-buffer-name)))
|
(let ((buf (get-buffer-create +eshell-buffer-name)))
|
||||||
(with-current-buffer buf
|
(with-current-buffer buf
|
||||||
(unless (eq major-mode 'eshell-mode) (eshell-mode)))
|
(unless (eq major-mode 'eshell-mode) (eshell-mode)))
|
||||||
(doom-popup-buffer buf '(:autokill t) t)
|
(pop-to-buffer buf)
|
||||||
(when command
|
(when command
|
||||||
(+eshell-run-command command))))
|
(+eshell-run-command command))))
|
||||||
|
|
||||||
|
|
|
@ -12,5 +12,5 @@
|
||||||
(defun +gist*list-render (orig-fn &rest args)
|
(defun +gist*list-render (orig-fn &rest args)
|
||||||
(funcall orig-fn (car args) t)
|
(funcall orig-fn (car args) t)
|
||||||
(unless (cadr args)
|
(unless (cadr args)
|
||||||
(doom-popup-buffer (current-buffer))))
|
(pop-to-buffer (current-buffer))))
|
||||||
(advice-add #'gist-list-render :around #'+gist*list-render))
|
(advice-add #'gist-list-render :around #'+gist*list-render))
|
||||||
|
|
|
@ -16,7 +16,7 @@ current project's root."
|
||||||
(require 'multi-term)
|
(require 'multi-term)
|
||||||
(let ((default-directory (if project-root (doom-project-root) default-directory))
|
(let ((default-directory (if project-root (doom-project-root) default-directory))
|
||||||
(buffer (multi-term-get-buffer current-prefix-arg)))
|
(buffer (multi-term-get-buffer current-prefix-arg)))
|
||||||
(select-window (doom-popup-buffer buffer))
|
(pop-to-buffer buffer)
|
||||||
(setq multi-term-buffer-list (nconc multi-term-buffer-list (list buffer)))
|
(setq multi-term-buffer-list (nconc multi-term-buffer-list (list buffer)))
|
||||||
(multi-term-internal)))
|
(multi-term-internal)))
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue