[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] scratch/mheerdegen-preview 0d07bb8 33/33: WIP: [el-search] Don't

From: Michael Heerdegen
Subject: [elpa] scratch/mheerdegen-preview 0d07bb8 33/33: WIP: [el-search] Don't kill modified buffers
Date: Wed, 24 Oct 2018 18:30:54 -0400 (EDT)

branch: scratch/mheerdegen-preview
commit 0d07bb80760e08a275ff4d0d20931245a68c1ef9
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>

    WIP: [el-search] Don't kill modified buffers
    This fixes a problem introduced in 1d2bbf66 "Improve working of
    `el-search-kill-left-over-search-buffers'": We still need to check
    whether the buffer to be killed has been modified (by
    (el-search-kill-left-over-search-buffers): Exclude modified buffers
    from killing.
 packages/el-search/el-search.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index ba8c84d..34bac65 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -1539,7 +1539,8 @@ the cursor) are not killed."
   (dolist (buffer (buffer-list))
     (when (with-current-buffer buffer el-search--temp-buffer-flag)
-      (unless (or (el-search--search-buffer-p buffer)
+      (unless (or (buffer-modified-p buffer) ; modified with 
+                  (el-search--search-buffer-p buffer)
                   (with-current-buffer buffer (el-search--pending-search-p)))
         (kill-buffer buffer)))))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]