changeset 8883:24993c71127a

(Fcopy_file): Use set_file_times, and check for the error return.
author Karl Heuer <kwzh@gnu.org>
date Sun, 18 Sep 1994 19:17:01 +0000
parents ff77b0aa7754
children b62d47fc7fc2
files src/fileio.c
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/fileio.c	Sun Sep 18 19:15:39 1994 +0000
+++ b/src/fileio.c	Sun Sep 18 19:17:01 1994 +0000
@@ -1836,7 +1836,8 @@
 	  EMACS_TIME atime, mtime;
 	  EMACS_SET_SECS_USECS (atime, st.st_atime, 0);
 	  EMACS_SET_SECS_USECS (mtime, st.st_mtime, 0);
-	  EMACS_SET_UTIMES (XSTRING (newname)->data, atime, mtime);
+	  if (set_file_times (XSTRING (newname)->data, atime, mtime))
+	    report_file_error ("I/O error", Fcons (newname, Qnil));
 	}
 #ifdef APOLLO
       if (!egetenv ("USE_DOMAIN_ACLS"))