"Writes the feed ATOM to FILENAME."
(with-temp-buffer
(atom-print atom)
- (write-region (point-min) (point-max) filename)))
+ (write-file filename)))
\f
(defun atom-to-rss (atom)
"Saves ATOM as a RSS feed into FILENAME."
(with-temp-buffer
(atom-print-as-rss atom)
- (write-region nil nil filename)))
+ (write-file filename)))
\f
(defvar atom-time-format-string "%Y-%m-%dT%T%z"