aboutsummaryrefslogtreecommitdiff
path: root/emacs/.emacs.d/init/ycp-buffer.el
diff options
context:
space:
mode:
authorYuchen Pei <id@ypei.org>2023-09-05 00:14:03 +1000
committerYuchen Pei <id@ypei.org>2023-09-05 00:14:03 +1000
commit1622ac38772868d101e48107591db8f4700627c4 (patch)
treed026b120b2cf15e90a9da62df26b6e646085f7f4 /emacs/.emacs.d/init/ycp-buffer.el
parent7e6e98e5683f2b0d8d335f53100b6b3623823df3 (diff)
A few changes
- add dedicate-windows-by-modes as window-configuration-change-hook, but it did not work well when used on gnus-summary-mode - copying gnus article regions also copies links, which are appended at the end of the copy as footnote - overload org-id-store-link so that capturing today's work could include the item priority - org should open a gnus link in other-window - fixing my-org-clean-up-entry so that it deletes trailing empty lines - added a silly utility function to clean a red energy bill pay link
Diffstat (limited to 'emacs/.emacs.d/init/ycp-buffer.el')
-rw-r--r--emacs/.emacs.d/init/ycp-buffer.el9
1 files changed, 5 insertions, 4 deletions
diff --git a/emacs/.emacs.d/init/ycp-buffer.el b/emacs/.emacs.d/init/ycp-buffer.el
index bb8b1dd..6096869 100644
--- a/emacs/.emacs.d/init/ycp-buffer.el
+++ b/emacs/.emacs.d/init/ycp-buffer.el
@@ -141,6 +141,7 @@
(my-package window
(require 'time)
(require 'my-buffer)
+ (add-hook 'window-configuration-change-hook 'my-dedicate-windows-by-modes)
(setq display-buffer-alist
`(;; no window
("\\`\\*Async Shell Command\\*\\'"
@@ -155,9 +156,9 @@
(window-parameters . ((mode-line-format . none))))
;; bottom buffer (NOT side window)
((or . (,(my-buffer-make-display-matcher
- '(flymake-diagnostics-buffer-mode
- flymake-project-diagnostics-mode
- messages-buffer-mode backtrace-mode))
+ '(flymake-diagnostics-buffer-mode
+ flymake-project-diagnostics-mode
+ messages-buffer-mode backtrace-mode))
"\\*\\(Warnings\\|Compile-Log\\|Org Links\\)\\*"
,world-clock-buffer-name))
(display-buffer-reuse-mode-window display-buffer-at-bottom)
@@ -202,7 +203,7 @@
"\\*\\(Man\\|woman\\).*"
"\\*shell\\*.*"))
(display-buffer-same-window))
-))
+ ))
(setq switch-to-buffer-in-dedicated-window 'pop)
(setq window-combination-resize nil)