--- newsticker.el.orig Tue Aug 30 14:21:10 2005 +++ newsticker.el Sat Aug 27 17:08:14 2005 @@ -2314,7 +2314,7 @@ (let ((running (newsticker-running-p))) ;; read old cache if it exists and newsticker is not running (unless running - (let* ((coding-system-for-read 'utf-8) + (let* ((coding-system-for-read 'compound-text) (buf (find-file-noselect newsticker-cache-filename))) (when buf (set-buffer buf) @@ -2430,7 +2430,7 @@ ;; definition of newsticker-mode, so we do it here (again) (auto-fill-mode -1) - (set-buffer-file-coding-system 'utf-8) + (set-buffer-file-coding-system 'compound-text) (if newsticker-use-full-width (set (make-local-variable 'fill-column) (1- (window-width)))) @@ -4751,13 +4751,13 @@ "Update newsticker cache file. If optional argument SAVE is not nil the cache file is saved to disk." (save-excursion - (let ((coding-system-for-write 'utf-8) + (let ((coding-system-for-write 'compound-text) (buf (find-file-noselect newsticker-cache-filename))) (when buf (set-buffer buf) (setq buffer-undo-list t) (erase-buffer) - (insert ";; -*- coding: utf-8 -*-\n") + (insert ";; -*- coding: compound-text -*-\n") (insert (prin1-to-string newsticker--cache)) (when save (save-buffer))))))