diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/nnfolder.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index eecbe978c29..f62a98c639b 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2011-02-17 Chong Yidong <cyd@stupidchicken.com> | ||
| 2 | |||
| 3 | * nnfolder.el (nnfolder-save-buffer): Don't let-bind copyright-update, | ||
| 4 | in case it's not yet loaded. | ||
| 5 | |||
| 1 | 2011-01-13 Chong Yidong <cyd@stupidchicken.com> | 6 | 2011-01-13 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 7 | ||
| 3 | * message.el (message-bury): Add special-case handling for Rmail. | 8 | * message.el (message-bury): Add special-case handling for Rmail. |
diff --git a/lisp/gnus/nnfolder.el b/lisp/gnus/nnfolder.el index a93f0913e42..d90e836e246 100644 --- a/lisp/gnus/nnfolder.el +++ b/lisp/gnus/nnfolder.el | |||
| @@ -1099,8 +1099,8 @@ This command does not work if you use short group names." | |||
| 1099 | (gnus-make-directory (file-name-directory (buffer-file-name))) | 1099 | (gnus-make-directory (file-name-directory (buffer-file-name))) |
| 1100 | (let ((coding-system-for-write | 1100 | (let ((coding-system-for-write |
| 1101 | (or nnfolder-file-coding-system-for-write | 1101 | (or nnfolder-file-coding-system-for-write |
| 1102 | nnfolder-file-coding-system)) | 1102 | nnfolder-file-coding-system))) |
| 1103 | (copyright-update nil)) | 1103 | (set (make-local-variable 'copyright-update) nil) |
| 1104 | (save-buffer))) | 1104 | (save-buffer))) |
| 1105 | (unless (or gnus-nov-is-evil nnfolder-nov-is-evil) | 1105 | (unless (or gnus-nov-is-evil nnfolder-nov-is-evil) |
| 1106 | (nnfolder-save-nov))) | 1106 | (nnfolder-save-nov))) |