[elpa] externals/ebdb fcf0702 275/350: Mark EBDB buffers as unmodified after save

[Eric Abrahamsen]

branch: externals/ebdb
commit fcf070283930af1f7835f4c96b24b99bffb14e5e
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>

    Mark EBDB buffers as unmodified after save
    
    * ebdb.el (ebdb-save): After ebdb-save, all *EBDB* buffers should be
      "unmodified".
---
 ebdb.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/ebdb.el b/ebdb.el
index d0632fe..3e24e93 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -1013,7 +1013,7 @@ first one."
     :type (or null ebdb-field-mail)
     :initform nil)
    (fields
-    :initarg :fields 
+    :initarg :fields
     :type (list-of ebdb-field)
     :initform nil)
    (defunct
@@ -4939,6 +4939,10 @@ If PROMPT is non-nil prompt before saving."
   (message "Saving the EBDB...")
   (dolist (s ebdb-db-list)
     (ebdb-db-save s prompt))
+  (dolist (b (buffer-list))
+    (with-current-buffer b
+      (when (derived-mode-p 'ebdb-mode)
+       (set-buffer-modified-p nil))))
   (message "Saving the EBDB... done"))
 
 ;;;###autoload