(barf_or_query_if_file_exists): Make the "File is a directory"

error be more correct.

diff --git a/src/ChangeLog b/src/ChangeLog
index 1be9b09..4e2658f 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,8 @@
        * fileio.c (barf_or_query_if_file_exists): Check first if the file
        is a directory before asking whether to use the file name
        (bug#7564).
+       (barf_or_query_if_file_exists): Make the "File is a directory"
+       error be more correct.
 
        * fns.c (Frequire): Remove the mention of the .gz files, since
        that's installation-specific, but keep the mention of

diff --git a/src/fileio.c b/src/fileio.c
index 6a4d1c5..68834d5 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -1757,7 +1757,7 @@ barf_or_query_if_file_exists (Lisp_Object absname, const char *querystring,
     {
       if (Ffile_directory_p (absname))
        xsignal2 (Qfile_error,
-                 build_string ("File name is a directory"), absname);
+                 build_string ("File is a directory"), absname);
 
       if (! interactive)
        xsignal2 (Qfile_already_exists,