From 3e0b797f616aebf8df59e799261c5d917ef3c5bb Mon Sep 17 00:00:00 2001 From: Daiki Ueno Date: Fri, 1 Jul 2011 11:07:32 +0900 Subject: [PATCH] Fix commit 2011-07-01T01:34:38Z!ueno@unixuser.org. --- lisp/gnus/plstore.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/plstore.el b/lisp/gnus/plstore.el index 8111c4c226e..360388d002e 100644 --- a/lisp/gnus/plstore.el +++ b/lisp/gnus/plstore.el @@ -143,12 +143,12 @@ May either be a string or a list of strings.") (defun plstore--init-from-buffer (plstore) (goto-char (point-min)) - (when (looking-at ";;; public entries\n") + (when (looking-at ";;; public entries") (forward-line) (plstore--set-alist plstore (read (point-marker))) (forward-sexp) (forward-char) - (when (looking-at ";;; secret entries\n") + (when (looking-at ";;; secret entries") (forward-line) (plstore--set-encrypted-data plstore (read (point-marker)))) (plstore--merge-secret plstore))) @@ -372,6 +372,7 @@ If no one is selected, symmetric encryption will be performed. " recipients) (if plstore-encrypt-to (epg-list-keys context recipients))))) + (goto-char (point-max)) (insert ";;; secret entries\n" (pp-to-string cipher)))) (save-buffer))) -- 2.11.4.GIT