[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/agitate 70f6387df1 3/5: Tweak how window and point are
From: |
ELPA Syncer |
Subject: |
[elpa] externals/agitate 70f6387df1 3/5: Tweak how window and point are saved |
Date: |
Thu, 20 Oct 2022 00:57:21 -0400 (EDT) |
branch: externals/agitate
commit 70f6387df1ff1057685011762546dbc2960bc537
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Tweak how window and point are saved
---
agitate.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/agitate.el b/agitate.el
index 1876e26c46..8cce50f840 100644
--- a/agitate.el
+++ b/agitate.el
@@ -287,9 +287,10 @@ user option `log-edit-keep-buffer'."
(defun agitate--log-edit-informative-save-windows ()
"Save `current-window-configuration'."
- (setq agitate--previous-window (get-buffer-window)
- agitate--previous-window-point (point)
- agitate--previous-window-configuration (current-window-configuration)))
+ (let ((win (get-buffer-window)))
+ (setq agitate--previous-window win
+ agitate--previous-window-point (window-point win)
+ agitate--previous-window-configuration
(current-window-configuration))))
(defun agitate--log-edit-informative-setup ()
"Set up informative `log-edit' window configuration."