emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

tools/eval: display in minibuffer if below threshold

Browse source 
If it's just a couple lines, display in minibuffer instead.
This commit is contained in:
Henrik Lissner 2019-10-26 03:54:09 -04:00
parent 36c9f7c333
commit d2fe021bd9
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 19 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

7
modules/tools/eval/autoload/eval.el
View file

@ -3,6 +3,10 @@
;;;###autoload ;;;###autoload
(defun +eval-display-results-in-popup (output &optional source-buffer) (defun +eval-display-results-in-popup (output &optional source-buffer)
"Display OUTPUT in a popup buffer." "Display OUTPUT in a popup buffer."
(if (with-temp-buffer
(insert output)
(>= (count-lines (point-min) (point-max))
+eval-overlay-max-lines))
(let ((output-buffer (get-buffer-create "*doom eval*")) (let ((output-buffer (get-buffer-create "*doom eval*"))
(origin (selected-window))) (origin (selected-window)))
(with-current-buffer output-buffer (with-current-buffer output-buffer
@ -16,7 +20,8 @@
(when-let (win (display-buffer output-buffer)) (when-let (win (display-buffer output-buffer))
(fit-window-to-buffer win)) (fit-window-to-buffer win))
(select-window origin) (select-window origin)
output-buffer)) output-buffer)
(message "%s" output)))
;;;###autoload ;;;###autoload
(defun +eval-display-results-in-overlay (output &optional source-buffer) (defun +eval-display-results-in-overlay (output &optional source-buffer)