bug#10489: 24.0.92; dired-do-copy may create infinite directory hierarchy

[Juanma Barranquero]

On Fri, Jan 13, 2012 at 14:11, Juanma Barranquero <lekktu@gmail.com> wrote:

>   (compare-strings (file-truename (expand-file-name name1 dir))
>                    (file-truename (expand-file-name name2 dir))
>                    nil nil
>                    read-file-name-completion-ignore-case))

Sorry, I meant

  (compare-strings (file-truename (expand-file-name name1 dir)) 0 nil
                   (file-truename (expand-file-name name2 dir)) 0 nil
                   read-file-name-completion-ignore-case))

    Juanma