[mew-int 00571] Re: Problem win Mew 2.1

[Marco Lombardi]

From: Kazu Yamamoto (山本和彦) <kazu at example.com>
Subject: [mew-int 00569] Re: Problem win Mew 2.1

> From: Marco Lombardi <lombardi at example.com>
> Subject: [mew-int 00568] Problem win Mew 2.1
> 
> > I tried to install Mew 2.1.  Everything seems to work fine, but when I
> > try to send messages I get this error (the stack here has been
> > produced with debug-on-error):
> 
> Emacs is not good in handling NFS. 

> You should not use NFS with Emacs.


Well, I understand that Emacs does not handle correctly NFS.  On the
other hand in my institute all directories are on NFS and I don't
think this situation is so exceptional.  I never experienced problems
with Mew 2.0, and I think it would be good to keep people that hare
using NFS using the updated versions of Mew.

Looking at the code, I saw that the problem arises from a line in
the function mew-smtp-queue in mew-smtp.el.  The line is marked with
an arrow below:

(defun mew-smtp-queue (pnm err)
  ;; Must be in a buffer where a message is contained.
  (let* ((oname (buffer-name))
	 (orig (buffer-file-name))
	 (qfld (mew-smtp-get-queue pnm))
	 file file-info nname)
    (mew-folder-check qfld 'force-to-create)
    (if (and (string-match (concat mew-queue-work-suffix "$") orig)
	     ;; another process has already queued?
	     (not (file-exists-p (file-name-sans-extension orig))))
	;; +queue/1.wrk
	(setq file (file-name-sans-extension orig))
      ;; +draft/1
      (setq file (mew-folder-new-message qfld)))
    (rename-file orig file 'override)
--> (set-file-modes file mew-file-mode)
    (setq file-info (concat file mew-queue-info-suffix))
    (setq nname (concat (file-name-as-directory qfld)
			(file-name-nondirectory file)))
    (mew-lisp-save file-info (mew-info pnm))
    (mew-remove-buffer (current-buffer))
    (message "%s has been queued to %s (%s)"
	     oname nname (or (mew-smtp-get-error pnm) err))
    (mew-touch-folder qfld)
    (mew-smtp-set-error pnm nil)))


This line was not present in Mew 2.0; deleting it makes everything
work.  I understand this line is there for privacy reasons, but
perhaps it is possible to change a little the code and still have
Mew-2.1 working.  I don't know how, but perhaps somebody in this list
does...

Many thanks,

Marco Lombardi