procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(eshell-shuffle-files): Compare inodes with

Browse source 
`equal' instead of `=', since they can be cons cells.  From Nils
Goesche <cartan@cartan.de>.
This commit is contained in:
Eli Zaretskii 2001-09-10 20:40:42 +00:00
parent 65ee3bf5bf
commit 1f9581b61c
2 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2001-09-10 Eli Zaretskii <eliz@is.elta.co.il>
* eshell/em-unix.el (eshell-shuffle-files): Compare inodes with
`equal' instead of `=', since they can be cons cells. From Nils
Goesche <cartan@cartan.de>.
2001-09-10 Andre Spiegel <spiegel@gnu.org>
* vc.el (vc-annotate): Rewrote doc string.

2
lisp/eshell/em-unix.el
View file

@ -342,7 +342,7 @@ Remove the DIRECTORY(ies), if they are empty.")
(eq system-type 'ms-dos))
(setq attr (eshell-file-attributes (car files)))
(nth 10 attr-target) (nth 10 attr)
(= (nth 10 attr-target) (nth 10 attr))
(equal (nth 10 attr-target) (nth 10 attr))
(nth 11 attr-target) (nth 11 attr)
(= (nth 11 attr-target) (nth 11 attr)))
(eshell-error (format "%s: `%s' and `%s' are the same file\n"