diff options
| author | Glenn Morris | 2011-05-16 19:32:50 -0700 |
|---|---|---|
| committer | Glenn Morris | 2011-05-16 19:32:50 -0700 |
| commit | 072be7db2bd5d724b3c0a012cf3d51b74ded9365 (patch) | |
| tree | f45a848c84edd317e08be8fa666a33da42a568d8 /lisp | |
| parent | 85d870a981d5d01c9e74e0316ec5b8249c84d7c9 (diff) | |
| download | emacs-072be7db2bd5d724b3c0a012cf3d51b74ded9365.tar.gz emacs-072be7db2bd5d724b3c0a012cf3d51b74ded9365.zip | |
* gnus-group.el (gnus-import-other-newsrc-file): Use insert-file-contents.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/gnus-group.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 57f74d40abf..068093159e3 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2011-05-17 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * gnus-group.el (gnus-import-other-newsrc-file): | ||
| 4 | Use insert-file-contents. | ||
| 5 | |||
| 1 | 2011-05-16 Teodor Zlatanov <tzz@lifelogs.com> | 6 | 2011-05-16 Teodor Zlatanov <tzz@lifelogs.com> |
| 2 | 7 | ||
| 3 | * gnus-sum.el (gnus-summary-hide-all-threads): Add update message every | 8 | * gnus-sum.el (gnus-summary-hide-all-threads): Add update message every |
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index c265538e19c..a21faa8c983 100644 --- a/lisp/gnus/gnus-group.el +++ b/lisp/gnus/gnus-group.el | |||
| @@ -4407,7 +4407,7 @@ and the second element is the address." | |||
| 4407 | ;; file. Use with caution, if at all. | 4407 | ;; file. Use with caution, if at all. |
| 4408 | (defun gnus-import-other-newsrc-file (file) | 4408 | (defun gnus-import-other-newsrc-file (file) |
| 4409 | (with-temp-buffer | 4409 | (with-temp-buffer |
| 4410 | (insert-file file) | 4410 | (insert-file-contents file) |
| 4411 | (let (form) | 4411 | (let (form) |
| 4412 | (while (ignore-errors | 4412 | (while (ignore-errors |
| 4413 | (setq form (read (current-buffer)))) | 4413 | (setq form (read (current-buffer)))) |