pestctrl/emacs-config
1
0
Fork 0
mirror of https://github.com/pestctrl/emacs-config.git synced 2026-02-16 16:24:18 +00:00
Code Issues Projects Releases Packages Wiki Activity

Bug has been resolved, olivetti thing

Browse source
This commit is contained in:
Benson Chu 2023-05-14 06:41:48 -05:00
parent 7ef0a153dd
commit 6ea271594f
1 changed files with 1 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
lisp/llvm-lib/my-comp-minor-mode.el
View file

@ -65,26 +65,13 @@ commands of Compilation major mode are available. See
it)
(concat it "\n")
(write-region it nil "~/.bash_history" 'append))
(aprog1 (apply orig args)
(aprog1 (save-window-excursion (apply orig args))
(set-process-filter (get-buffer-process it) nil)
(awhen (get-buffer-window it)
(delete-window it))
(with-current-buffer it
(when (cadr args)
(compilation-minor-mode t)
(setq compilation-finish-local-sticky hs)
(setq compilation-finish-local-transient ht)))
;; For some reason, when calling display-buffer, window doesn't get sent
;; to the side. This is because in my/is-compilation-buffer,
;; compilation-minor-mode is nil. No idea why, just manually call
;; display-buffer-in-side-window.
;; For some reason, calling display-window-in-side-window directly
;; doesn't work EITHER. The window doesn't pop up UNLESS there already
;; exists a side-window.
;; This only happens if we have (save-window-excursion (apply orig args))
;; instead of delete-window.
(with-selected-window (display-buffer it)
(when (eq major-mode 'compilation-mode)
(goto-char (point-max)))))))