mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00
Code Issues Releases Activity

(Frename_file, Fcopy_file, Fadd_name_to_file, Fmake_symbolic_link): Fix typo

Browse Source 
in previous change.
This commit is contained in:
Karl Heuer 1994-03-16 03:01:46 +00:00
parent 7fe78b07bc
commit 36712b0a1b
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/fileio.c
View File

@ -1715,8 +1715,8 @@ A prefix arg makes KEEP-TIME non-nil.")
if (NILP (handler))
handler = Ffind_file_name_handler (newname);
if (!NILP (handler))
return RETURN_UNGCPRO (call5 (handler, Qcopy_file, filename, newname,
ok_if_already_exists, keep_date));
RETURN_UNGCPRO (call5 (handler, Qcopy_file, filename, newname,
ok_if_already_exists, keep_date));
if (NILP (ok_if_already_exists)
|| XTYPE (ok_if_already_exists) == Lisp_Int)
@ -1890,8 +1890,8 @@ This is what happens in interactive use with M-x.")
if (NILP (handler))
handler = Ffind_file_name_handler (newname);
if (!NILP (handler))
return RETURN_UNGCPRO (call4 (handler, Qrename_file,
filename, newname, ok_if_already_exists));
RETURN_UNGCPRO (call4 (handler, Qrename_file,
filename, newname, ok_if_already_exists));
if (NILP (ok_if_already_exists)
|| XTYPE (ok_if_already_exists) == Lisp_Int)
@ -1953,8 +1953,8 @@ This is what happens in interactive use with M-x.")
call the corresponding file handler. */
handler = Ffind_file_name_handler (filename);
if (!NILP (handler))
return RETURN_UNGCPRO (call4 (handler, Qadd_name_to_file, filename,
newname, ok_if_already_exists));
RETURN_UNGCPRO (call4 (handler, Qadd_name_to_file, filename,
newname, ok_if_already_exists));
if (NILP (ok_if_already_exists)
|| XTYPE (ok_if_already_exists) == Lisp_Int)
@ -2007,8 +2007,8 @@ This happens for interactive use with M-x.")
call the corresponding file handler. */
handler = Ffind_file_name_handler (filename);
if (!NILP (handler))
return RETURN_UNGCPRO (call4 (handler, Qmake_symbolic_link, filename,
linkname, ok_if_already_exists));
RETURN_UNGCPRO (call4 (handler, Qmake_symbolic_link, filename,
linkname, ok_if_already_exists));
if (NILP (ok_if_already_exists)
|| XTYPE (ok_if_already_exists) == Lisp_Int)