From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Michael Albinus Newsgroups: gmane.emacs.bugs Subject: bug#10489: 24.0.92; dired-do-copy may create infinite directory hierarchy Date: Fri, 13 Jan 2012 20:04:35 +0100 Message-ID: <87fwfjo24c.fsf@gmx.de> References: <87mx9su32g.fsf@web.de> <87sjjkfvwt.fsf@gmail.com> <8362ggkquq.fsf@gnu.org> <87lipcrlga.fsf@gmail.com> <87fwfkc4pn.fsf@gmx.de> <87fwfjsw8t.fsf@gmail.com> <87aa5rdazl.fsf@gmx.de> <87d3anogf5.fsf@gmail.com> <011AEED9E81C4DEFA6B1E03B0F57F28F@us.oracle.com> <878vlbljnc.fsf@gmx.de> <8739bj8mu1.fsf@gmail.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1326481547 16140 80.91.229.12 (13 Jan 2012 19:05:47 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Fri, 13 Jan 2012 19:05:47 +0000 (UTC) Cc: 10489@debbugs.gnu.org To: Thierry Volpiatto Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Fri Jan 13 20:05:42 2012 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RlmRa-0006P5-3N for geb-bug-gnu-emacs@m.gmane.org; Fri, 13 Jan 2012 20:05:42 +0100 Original-Received: from localhost ([::1]:55065 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RlmRY-0004my-L9 for geb-bug-gnu-emacs@m.gmane.org; Fri, 13 Jan 2012 14:05:40 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:55614) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RlmRN-0004HN-Ke for bug-gnu-emacs@gnu.org; Fri, 13 Jan 2012 14:05:34 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RlmRI-0006QW-M0 for bug-gnu-emacs@gnu.org; Fri, 13 Jan 2012 14:05:29 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:33803) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RlmRI-0006QK-Dm for bug-gnu-emacs@gnu.org; Fri, 13 Jan 2012 14:05:24 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.72) (envelope-from ) id 1RlmRu-000296-AA for bug-gnu-emacs@gnu.org; Fri, 13 Jan 2012 14:06:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Michael Albinus Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Fri, 13 Jan 2012 19:06:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 10489 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 10489-submit@debbugs.gnu.org id=B10489.13264815248203 (code B ref 10489); Fri, 13 Jan 2012 19:06:02 +0000 Original-Received: (at 10489) by debbugs.gnu.org; 13 Jan 2012 19:05:24 +0000 Original-Received: from localhost ([127.0.0.1]:56709 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1RlmRI-00028G-EQ for submit@debbugs.gnu.org; Fri, 13 Jan 2012 14:05:24 -0500 Original-Received: from mailout-de.gmx.net ([213.165.64.23]:41407) by debbugs.gnu.org with smtp (Exim 4.72) (envelope-from ) id 1RlmRG-000288-87 for 10489@debbugs.gnu.org; Fri, 13 Jan 2012 14:05:23 -0500 Original-Received: (qmail invoked by alias); 13 Jan 2012 19:04:40 -0000 Original-Received: from p57BB9670.dip0.t-ipconnect.de (EHLO detlef.gmx.de) [87.187.150.112] by mail.gmx.net (mp033) with SMTP; 13 Jan 2012 20:04:40 +0100 X-Authenticated: #3708877 X-Provags-ID: V01U2FsdGVkX18Lc8EMx7oLT7HV6uzG2fPIgMfcdNNnKu7o8k4Nz7 7BDHasazYy8gYF In-Reply-To: <8739bj8mu1.fsf@gmail.com> (Thierry Volpiatto's message of "Fri, 13 Jan 2012 19:43:50 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.92 (gnu/linux) X-Y-GMX-Trusted: 0 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:55709 Archived-At: Thierry Volpiatto writes: > What about this? > > (defun file-name-equal-p (name1 name2 &optional dir) > (let* ((n1 (file-truename (expand-file-name name1 dir))) > (n2 (file-truename (expand-file-name name2 dir))) > (rhost1 (file-remote-p n1 'host)) > (rhost2 (file-remote-p n2 'host)) > (lname1 (file-remote-p n1 'localname)) > (lname2 (file-remote-p n2 'localname)) > (rem-n1 (if rhost1 > (list (cons rhost1 lname1)) > (list (cons (system-name) n1)))) > (rem-n2 (if rhost2 > (list (cons rhost2 lname2)) > (list (cons (system-name) n2))))) > (loop for (x1 . y1) in rem-n1 > for (x2 . y2) in rem-n2 > thereis (and (equal x1 x2) > (equal y1 y2))))) Nope. User name and method also matter. "/ftp:host:/file" <> "/ssh:@host:/file" "/ftp:user1@host:/file" <> "/ftp:user1@host:/file" You shouldn't mess with remote files, really :-) That's what file name handlers are good for. Best regards, Michael.