diff lisp/files.el @ 211:78478c60bfcd r20-4b4

Import from CVS: tag r20-4b4
author cvs
date Mon, 13 Aug 2007 10:05:51 +0200
parents 41ff10fd062f
children 262b8bb4a523
line wrap: on
line diff
--- a/lisp/files.el	Mon Aug 13 10:05:01 2007 +0200
+++ b/lisp/files.el	Mon Aug 13 10:05:51 2007 +0200
@@ -964,7 +964,7 @@
 problems will be suppressed."
   (setq filename (abbreviate-file-name (expand-file-name filename)))
   (if (file-directory-p filename)
-      (if find-file-run-dired
+      (if (and (fboundp 'dired-noselect) find-file-run-dired)
 	  (dired-noselect (if find-file-use-truenames
 			      (abbreviate-file-name (file-truename filename))
 			    filename))