diff options
| author | Daiki Ueno <ueno@unixuser.org> | 2011-07-01 11:07:32 +0900 |
|---|---|---|
| committer | Daiki Ueno <ueno@unixuser.org> | 2011-07-01 11:07:32 +0900 |
| commit | 3e0b797f616aebf8df59e799261c5d917ef3c5bb (patch) | |
| tree | b0c9a7ca55e7e788442466d80fd8995f574c8145 /lisp/gnus/plstore.el | |
| parent | cdf4d4551d9e2b91fb0127ba8162e94910f514bf (diff) | |
| download | emacs-3e0b797f616aebf8df59e799261c5d917ef3c5bb.tar.gz | |
Fix commit 2011-07-01T01:34:38Z!ueno@unixuser.org.
Diffstat (limited to 'lisp/gnus/plstore.el')
| -rw-r--r-- | lisp/gnus/plstore.el | 5 |
1 files 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))) |