diff options
| -rw-r--r-- | lisp/gnus/gnus-start.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el index cce201e1f11..623055e1f65 100644 --- a/lisp/gnus/gnus-start.el +++ b/lisp/gnus/gnus-start.el | |||
| @@ -2450,10 +2450,6 @@ If FORCE is non-nil, the .newsrc file is read." | |||
| 2450 | (setq gnus-format-specs gnus-default-format-specs))) | 2450 | (setq gnus-format-specs gnus-default-format-specs))) |
| 2451 | (when gnus-newsrc-assoc | 2451 | (when gnus-newsrc-assoc |
| 2452 | (setq gnus-newsrc-alist gnus-newsrc-assoc)))) | 2452 | (setq gnus-newsrc-alist gnus-newsrc-assoc)))) |
| 2453 | (dolist (elem gnus-newsrc-alist) | ||
| 2454 | ;; Protect against broken .newsrc.el files. | ||
| 2455 | (when (car elem) | ||
| 2456 | (setcar elem (string-as-unibyte (car elem))))) | ||
| 2457 | (gnus-make-hashtable-from-newsrc-alist) | 2453 | (gnus-make-hashtable-from-newsrc-alist) |
| 2458 | (when (file-newer-than-file-p file ding-file) | 2454 | (when (file-newer-than-file-p file ding-file) |
| 2459 | ;; Old format quick file | 2455 | ;; Old format quick file |