.overview file coding system when caching article.

[Tatsuya Ichikawa <ichikawa@hv.epson.co.jp>]

[-- Attachment #1: Type: text/plain, Size: 208 bytes --]


  When gnus-cache-enter-article cache article , .overview file wrote
  in sjis-dos file coding system on mule that works on Microsoft
  Windows.

  I correct this problem following patch.

  Any problem ??


[-- Attachment #2: gnus-util.el.diff --]
[-- Type: application/octet-stream, Size: 974 bytes --]

*** gnus-util.el.orig	Tue Aug 25 17:01:32 1998
--- gnus-util.el	Tue Aug 25 10:39:20 1998
***************
*** 537,542 ****
--- 537,544 ----
  
  (defvar gnus-work-buffer " *gnus work*")
  
+ (defvar gnus-write-file-coding-system 'raw-text)
+ 
  (defun gnus-set-work-buffer ()
    "Put point in the empty Gnus work buffer."
    (if (get-buffer gnus-work-buffer)
***************
*** 605,611 ****
    ;; Make sure the directory exists.
    (gnus-make-directory (file-name-directory file))
    ;; Write the buffer.
!   (write-region (point-min) (point-max) file nil 'quietly))
  
  (defun gnus-delete-file (file)
    "Delete FILE if it exists."
--- 607,614 ----
    ;; Make sure the directory exists.
    (gnus-make-directory (file-name-directory file))
    ;; Write the buffer.
!   (let ((coding-system-for-write gnus-write-file-coding-system))
!     (write-region (point-min) (point-max) file nil 'quietly)))
  
  (defun gnus-delete-file (file)
    "Delete FILE if it exists."

[-- Attachment #3: Type: text/plain, Size: 377 bytes --]


  And I always reading mail from "Multiple" pop3 servers.
  So , I write "Front End" package enable to get mail from multiple
  pop3 servers.

  If someone needs this package , please merge this package.
  Package name is "pop3-fma" (pop3 For Multi Account).

  Thanks.

-- 
  Tatsuya Ichikawa <ichikawa@hv.epson.co.jp>
  # PGP Public Key : See X-Info header in this message.