[elpa] 135/352: Revert "Yksinkertaistetaan tietokantafunktiota"

[Stefan Monnier]

monnier pushed a commit to branch master
in repository elpa.

commit d08cefeb85a2d7439cfb93d36cb2d1e3b61dba65
Author: Teemu Likonen <tliko...@iki.fi>
Date:   Sun Jul 26 17:58:16 2009 +0000

    Revert "Yksinkertaistetaan tietokantafunktiota"
    
    This reverts commit r2805
    
    Pelkkä PLIST-PUT-operaatio ei olekaan täysin luotettava Emacs Lispissä.
    Common Lisp on kyllä parempi...
---
 wcheck-mode.el |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/wcheck-mode.el b/wcheck-mode.el
index 2e6aa53..3423c84 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -1016,7 +1016,9 @@ with the matching KEY VALUE."
   "Set KEY's VALUE for BUFFER."
   (let ((item (wcheck-get-data :buffer buffer)))
     (when item
-      (plist-put item key value))))
+      (wcheck-delete-buffer-data buffer)
+      (plist-put item key value)
+      (push item wcheck-buffer-data))))
 
 
 (provide 'wcheck-mode)