diff options
| author | jao <jao@gnu.org> | 2025-10-11 00:30:32 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-10-11 00:30:32 +0100 |
| commit | ef23d57c6bd134cf071e3940e5ae8c1e3c14a067 (patch) | |
| tree | 831730e66c4ed45aba578e922f9cfdb39caf2236 | |
| parent | c7318e708f6209a0ce64cf81ae0f4eca7760b569 (diff) | |
| download | elibs-ef23d57c6bd134cf071e3940e5ae8c1e3c14a067.tar.gz elibs-ef23d57c6bd134cf071e3940e5ae8c1e3c14a067.tar.bz2 | |
gnus: better two-pane layout
| -rw-r--r-- | custom/jao-custom-gnus.el | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/custom/jao-custom-gnus.el b/custom/jao-custom-gnus.el index b7c0852..dc729ce 100644 --- a/custom/jao-custom-gnus.el +++ b/custom/jao-custom-gnus.el @@ -98,10 +98,14 @@ (summary 0.25 point) (article 1.0))))) - ;; (gnus-add-configuration - ;; `(group (horizontal 1.0 - ;; (group 0.5 point) - ;; ("*notmuch-hello*" 1.0)))) + (gnus-add-configuration + `(group (horizontal 1.0 + (group 0.5 point) + (vertical 1.0 + ("*Org Agenda*" 0.5) + ("inbox.org" 1.0) + ;; ("*notmuch-hello*" 1.0) + )))) (gnus-add-configuration `(message (horizontal 1.0 (message 1.0 point)))) @@ -333,7 +337,8 @@ (let* ((d (if jao-gnus-use-three-panes (+ jao-gnus-groups-width 11) (+ jao-gnus-groups-width 12))) - (w (- (or w (window-width)) d))) + (w (or w (if jao-gnus-use-three-panes (window-width) (frame-width)))) + (w (- w d))) (setq gnus-summary-line-format (format jao-gnus--summary-line-fmt w)))) (add-hook 'gnus-select-group-hook 'jao-gnus--set-summary-line) @@ -650,6 +655,7 @@ (gnus-demon-add-handler 'jao-gnus--scan 5 1)) (defun jao-gnus-remove-demon () + (interactive) (gnus-demon-remove-handler 'jao-gnus--scan)) (jao-gnus-add-demon) |