From b4bd27c59aea9c2b45aeb1caef8fca55bf0c8bc7 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 16 May 2003 18:50:24 +0000 Subject: [PATCH] (Fdelete_file): Handle symlinks pointing to directories. --- src/ChangeLog | 5 +++++ src/fileio.c | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/src/ChangeLog b/src/ChangeLog index 1ff5c7cedf4..5a67533e82b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2003-05-16 Ralph Schleicher (tiny change) + + * fileio.c (Fdelete_file): Handle symlinks pointing to + directories. + 2003-05-15 Stefan Monnier * keyboard.c (apply_modifiers): Don't fill the other cache. diff --git a/src/fileio.c b/src/fileio.c index cfaf5738a5e..c84298cdaf1 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -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))); -- 2.39.2