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:
parent
ace41f7d6e
commit
b4bd27c59a
2 changed files with 7 additions and 1 deletions
|
|
@ -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.
|
||||
|
|
|
|||
|
|
@ -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)));
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue