Mercurial > emacs
comparison src/fileio.c @ 83122:d895a49cccb9
Merged in changes from CVS trunk.
Patches applied:
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-291
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-292
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-293
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-294
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-295
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-296
Allow restarting an existing debugger session that's exited
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-297
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-298
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-162
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Tue, 11 May 2004 09:12:09 +0000 |
parents | 46882e012e30 626bc3834cd3 |
children | 50b9a96c837c |
comparison
equal
deleted
inserted
replaced
83121:84cafe5c268f | 83122:d895a49cccb9 |
---|---|
1 /* File IO for GNU Emacs. | 1 /* File IO for GNU Emacs. |
2 Copyright (C) 1985,86,87,88,93,94,95,96,97,98,99,2000,01,2003 | 2 Copyright (C) 1985,86,87,88,93,94,95,96,97,98,99,2000,01,03,2004 |
3 Free Software Foundation, Inc. | 3 Free Software Foundation, Inc. |
4 | 4 |
5 This file is part of GNU Emacs. | 5 This file is part of GNU Emacs. |
6 | 6 |
7 GNU Emacs is free software; you can redistribute it and/or modify | 7 GNU Emacs is free software; you can redistribute it and/or modify |
2729 { | 2729 { |
2730 #ifdef S_IFLNK | 2730 #ifdef S_IFLNK |
2731 symlink_target = Ffile_symlink_p (file); | 2731 symlink_target = Ffile_symlink_p (file); |
2732 if (! NILP (symlink_target)) | 2732 if (! NILP (symlink_target)) |
2733 Fmake_symbolic_link (symlink_target, newname, | 2733 Fmake_symbolic_link (symlink_target, newname, |
2734 NILP (ok_if_already_exists) ? Qnil : Qt, Qt); | 2734 NILP (ok_if_already_exists) ? Qnil : Qt); |
2735 else | 2735 else |
2736 #endif | 2736 #endif |
2737 Fcopy_file (file, newname, | 2737 Fcopy_file (file, newname, |
2738 /* We have already prompted if it was an integer, | 2738 /* We have already prompted if it was an integer, |
2739 so don't have copy-file prompt again. */ | 2739 so don't have copy-file prompt again. */ |