delete-file

delete-file

[Schleicher Ralph (LLI)]

This bug report will be sent to the Free Software Foundation,
not to your local site managers!
Please write in English, because the Emacs maintainers do not have
translators to read other languages for them.

Your bug report will be posted to the bug-gnu-emacs@gnu.org mailing list,
and to the gnu.emacs.bug news group.

In GNU Emacs 21.3.2 (hppa2.0w-hp-hpux11.00, Motif Version 2.1.0)
 of 2003-05-16 on w3016
configured using `configure  --prefix=/home/raid/cea_adm --exec-prefix=/home/raid/cea_adm/hppa2.0w-hp-hpux11.00 --with-x-toolkit=motif'
Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: C.iso88591
  locale-coding-system: iso-latin-1
  default-enable-multibyte-characters: nil

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:


The function delete-file rises an error if FILENAME is a symlink
pointing to a directory.  Here is a patch together with a ChangeLog
entry.


2003-05-16  Ralph Schleicher  <rs@nunatak.allgaeu.org>

	* fileio.c (Fdelete_file): Handle symlinks pointing to
	directories.


diff -u emacs-21.3/src/fileio.c.orig emacs-21.3/src/fileio.c
--- emacs-21.3/src/fileio.c.orig	Tue Feb  4 11:52:40 2003
+++ emacs-21.3/src/fileio.c	Fri May 16 10:02:55 2003
@@ -2547,7 +2547,8 @@
   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)));


Recent input:
<help-echo> <down-mouse-1> <mouse-1> <help-echo> <escape> 
> <up> <up> <up> <up> <down> d x y e s <return> <up> 
g C-x m C-x k <return> <help-echo> <help-echo> <help-echo> 
<menu-bar> <help-menu> <report-emacs-bug>

Recent messages:
Checking new news...done
Loading gnus-topic...done
Loading gnus-msg...done
Loading mailabbrev...done
Parsing /home/w3016.5/schleich/.mailrc... done
Loading lazy-lock...done
Loading view...done
Fontifying *mail*... (regexps...........)
Loading view...done
Loading emacsbug...done

-- 
Ralph