Mercurial > emacs

diff lisp/gnus/gnus-draft.el @ 111064:c9f6036480c9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
emacs-mime.texi (Flowed text): Add a note about mml-enable-flowed variable. gnus/ChangeLog (2010-10-15): Fix typo in changelog. gnus-draft.el (gnus-draft-check-draft-articles): Don't unnecessarily run file-truename on remote files when checking drafts.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Wed, 20 Oct 2010 10:31:10 +0000
parents 8d09094063d0
children 417b1e4d63cd
line wrap: on
line diff
--- a/lisp/gnus/gnus-draft.el	Wed Oct 20 07:31:25 2010 +0000
+++ b/lisp/gnus/gnus-draft.el	Wed Oct 20 10:31:10 2010 +0000
@@ -310,6 +310,8 @@
 	  (while buffs
 	    (set-buffer (setq buff (pop buffs)))
 	    (if (and buffer-file-name
+		     (equal (file-remote-p file)
+			    (file-remote-p buffer-file-name))
 		     (string-equal (file-truename buffer-file-name)
 				   (file-truename file))
 		     (buffer-modified-p))