# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1045041922 0
# Node ID d886db23ad3a19552a7e20815aea086fb015db4e
# Parent  b1415b1712d3eaa09622f2c182058557346e45c1
(find-alternate-file): Check whether `dired-directory' is bound.

diff -r b1415b1712d3 -r d886db23ad3a lisp/files.el
--- a/lisp/files.el	Tue Feb 11 23:47:11 2003 +0000
+++ b/lisp/files.el	Wed Feb 12 09:25:22 2003 +0000
@@ -940,7 +940,7 @@
   (let ((obuf (current-buffer))
 	(ofile buffer-file-name)
 	(onum buffer-file-number)
-	(odir dired-directory)
+	(odir (bound-and-true-p dired-directory))
 	(otrue buffer-file-truename)
 	(oname (buffer-name)))
     (if (get-buffer " **lose**")