From: Glenn Morris <rgm@gnu.org>
Date: Mon, 27 Aug 2007 07:10:50 +0000 (+0000)
Subject: (diff-find-file-name): Only accept regular files, to rule out
X-Git-Tag: emacs-pretest-22.1.90~894
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=73f21f883c908f6d5151161c98c9926301ee458b;p=emacs.git

(diff-find-file-name): Only accept regular files, to rule out
/dev/null, directories, etc.
---

diff --git a/lisp/diff-mode.el b/lisp/diff-mode.el
index e0aee67a62b..7cd7375ab98 100644
--- a/lisp/diff-mode.el
+++ b/lisp/diff-mode.el
@@ -646,7 +646,9 @@ PREFIX is only used internally: don't use it."
 	   ((or (null files)
 		(setq file (do* ((files files (cdr files))
 				 (file (car files) (car files)))
-			       ((or (null file) (file-exists-p file))
+			       ;; Use file-regular-p to avoid
+			       ;; /dev/null, directories, etc.
+			       ((or (null file) (file-regular-p file))
 				file))))
 	    file))
        ;; <foo>.rej patches implicitly apply to <foo>