diff options
| author | jao <jao@gnu.org> | 2025-10-29 01:28:49 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-10-29 01:28:49 +0000 |
| commit | bf1652da4ce8b03bf08763cbdc710458cfdf4cac (patch) | |
| tree | 859cf3603d740ccd5b0e84685b597b25fa8f5dba /custom | |
| parent | bdfcb0c1119d4dee5d8fdff9f3c75ee5cb0ebe80 (diff) | |
| download | elibs-bf1652da4ce8b03bf08763cbdc710458cfdf4cac.tar.gz elibs-bf1652da4ce8b03bf08763cbdc710458cfdf4cac.tar.bz2 | |
gnus: geometry tweaks
Diffstat (limited to 'custom')
| -rw-r--r-- | custom/jao-custom-gnus.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/custom/jao-custom-gnus.el b/custom/jao-custom-gnus.el index ff7390f..7483e39 100644 --- a/custom/jao-custom-gnus.el +++ b/custom/jao-custom-gnus.el @@ -87,8 +87,7 @@ ,side-bar))))) (defun jao-gnus-use-two-panes () - (let ((wide-len jao-gnus-wide-width) - (groups-len jao-gnus-groups-width) + (let ((groups-len jao-gnus-groups-width) (summary-len (- jao-gnus-wide-width jao-gnus-groups-width)) (msg-edit '(horizontal 1.0 (message 1.0 point) @@ -123,9 +122,7 @@ (gnus-add-configuration `(reply-yank ,msg-edit)) (gnus-add-configuration - `(reply (horizontal 1.0 - (message ,(- wide-len 100) point) - (article 1.0)))))) + `(reply (horizontal 1.0 (message 0.5 point) (article 1.0)))))) (if jao-gnus-use-three-panes (jao-gnus-use-three-panes) @@ -659,10 +656,12 @@ (defun jao-gnus-add-demon () (interactive) + (message "Adding scan demon for Gnus...") (gnus-demon-add-handler 'jao-gnus--scan 5 1)) (defun jao-gnus-remove-demon () (interactive) + (message "Removing scan demon for Gnus...") (gnus-demon-remove-handler 'jao-gnus--scan)) (jao-gnus-add-demon) |