Correct last inline hook defuns

See a3e262c7 for rationale
This commit is contained in:
Henrik Lissner 2019-07-28 14:52:59 +02:00
parent a354bba261
commit 19ecf8e46a
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
25 changed files with 39 additions and 39 deletions

View file

@ -38,7 +38,7 @@
(insert output))
(setq quickrun-option-outputter quickrun--original-outputter))))
(add-hook 'quickrun-after-run-hook
(add-hook! 'quickrun-after-run-hook
(defun +eval-quickrun-shrink-window-h ()
"Shrink the quickrun output window once code evaluation is complete."
(when-let (win (get-buffer-window quickrun--buffer-name))
@ -46,7 +46,7 @@
(let ((ignore-window-parameters t))
(shrink-window-if-larger-than-buffer))))))
(add-hook 'quickrun-after-run-hook
(add-hook! 'quickrun-after-run-hook
(defun +eval-quickrun-scroll-to-bof-h ()
"Ensures window is scrolled to BOF on invocation."
(when-let (win (get-buffer-window quickrun--buffer-name))