1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 08:11:05 -08:00

(Fdelete_file): Handle symlinks pointing to directories.

This commit is contained in:
Richard M. Stallman 2003-05-16 18:50:24 +00:00
parent ace41f7d6e
commit b4bd27c59a
2 changed files with 7 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2003-05-16 Ralph Schleicher <rs@nunatak.allgaeu.org> (tiny change)
* fileio.c (Fdelete_file): Handle symlinks pointing to
directories.
2003-05-15 Stefan Monnier <monnier@cs.yale.edu>
* keyboard.c (apply_modifiers): Don't fill the other cache.

View file

@ -2623,7 +2623,8 @@ If file has multiple names, it continues to exist with the other names. */)
struct gcpro gcpro1;
GCPRO1 (filename);
if (!NILP (Ffile_directory_p (filename)))
if (!NILP (Ffile_directory_p (filename))
&& NILP (Ffile_symlink_p (filename)))
Fsignal (Qfile_error,
Fcons (build_string ("Removing old name: is a directory"),
Fcons (filename, Qnil)));