Mercurial > hg > xemacs-beta
comparison lisp/gnus/gnus-start.el @ 122:d2f30a177268 r20-1b14
Import from CVS: tag r20-1b14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:26:03 +0200 |
parents | cca96a509cfe |
children | 1856695b1fa9 |
comparison
equal
deleted
inserted
replaced
121:419db647c998 | 122:d2f30a177268 |
---|---|
2172 (run-hooks 'gnus-save-newsrc-hook) | 2172 (run-hooks 'gnus-save-newsrc-hook) |
2173 (if gnus-slave | 2173 (if gnus-slave |
2174 (gnus-slave-save-newsrc) | 2174 (gnus-slave-save-newsrc) |
2175 ;; Save .newsrc. | 2175 ;; Save .newsrc. |
2176 (when gnus-save-newsrc-file | 2176 (when gnus-save-newsrc-file |
2177 (gnus-message 5 "Saving %s..." gnus-current-startup-file) | 2177 (gnus-message 8 "Saving %s..." gnus-current-startup-file) |
2178 (gnus-gnus-to-newsrc-format) | 2178 (gnus-gnus-to-newsrc-format) |
2179 (gnus-message 5 "Saving %s...done" gnus-current-startup-file)) | 2179 (gnus-message 8 "Saving %s...done" gnus-current-startup-file)) |
2180 ;; Save .newsrc.eld. | 2180 ;; Save .newsrc.eld. |
2181 (set-buffer (get-buffer-create " *Gnus-newsrc*")) | 2181 (set-buffer (get-buffer-create " *Gnus-newsrc*")) |
2182 (make-local-variable 'version-control) | 2182 (make-local-variable 'version-control) |
2183 (setq version-control 'never) | 2183 (setq version-control 'never) |
2184 (setq buffer-file-name | 2184 (setq buffer-file-name |