(openp): Get the Qfile_exists_p handler for STRING, not FN.

2 files changed, 10 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 4cd53e526cb..9d6afda24d1 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,12 @@
+2003-04-08  Richard M. Stallman  <rms@gnu.org>
+
+        * fileio.c (Finsert_file_contents): Doc fix.
+        (syms_of_fileio) <after-insert-file-functions>: Doc fix.
+
+2003-04-08  Ivan Zakharyaschev  <imz@altlinux.org>  (tiny change)
+        
+        * lread.c (openp): Get the Qfile_exists_p handler for STRING, not FN.
+
 2003-04-08  Steven Tamm  <steventamm@mac.com>
         * mac.c (init_mac_osx_environment): Switch libexec and bin so
         that self-contained application finds libexec files.
diff --git a/src/lread.c b/src/lread.c
index dfbbfeaad1e..e4663e0eb89 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1121,8 +1121,8 @@ openp (path, str, suffixes, storeptr, predicate)
                   handler = Ffind_file_name_handler (filename, Qfile_exists_p);
              It's not clear why that was the case and it breaks things like
              (load "/bar.el") where the file is actually "/bar.el.gz".  */
-          handler = Ffind_file_name_handler (filename, Qfile_exists_p);
           string = build_string (fn);
+          handler = Ffind_file_name_handler (string, Qfile_exists_p);
           if ((!NILP (handler) || !NILP (predicate)) && !NATNUMP (predicate))
             {
               if (NILP (predicate))