From: Michael Albinus <michael.albinus@gmx.de>
To: "François Puitg" <Francois.Puitg@imag.fr>
Cc: help-gnu-emacs@gnu.org, Dave O'Toole <dto@gnu.org>
Subject: Re: eshell/cp not able to use Tramp syntax ?
Date: Wed, 31 Oct 2007 21:30:21 +0100 [thread overview]
Message-ID: <87mytz10yq.fsf@gmx.de> (raw)
In-Reply-To: <87myu3zgiq.fsf@imag.fr> ("François Puitg"'s message of "Dim, 28 Oct 2007 11:21:17 +0100")
"François Puitg" <Francois.Puitg@imag.fr> writes:
> So I'll load the required library manually:
>
> ,----
> | [(meta x)] load-library esh-maint
> | [(meta x)] load-library em-unix
> | [(meta :)] (eshell/cp "/home/fran/Devel/Emacs/Org/test.c"
> | "/[puitg@ssh-leibniz.imag.fr]public_html/")
> `----
>
> Lisp backtrace below and debug info at the end of the mail.
>
> -- Frnçs
>
> Debugger entered--Lisp error: (wrong-type-argument number-char-or-marker-p (0 . 7498))
> =((0 . 7498) 905219)
> (and attr-target (or (not ...) (eq system-type ...)) (setq attr (eshell-file-attributes ...)) (nth 10 attr-target) (nth 10 attr) (= (nth 10 attr-target) (nth 10 attr)) (nth 11 attr-target) (nth 11 attr) (= (nth 11 attr-target) (nth 11 attr)))
> (cond ((string-match "\\`\\.\\.?\\'" ...) (if eshell-warn-dot-directories ...)) ((and attr-target ... ... ... ... ... ... ... ...) (eshell-error ...)) (t (let ... ...)))
> (while files (setcar files (directory-file-name ...)) (cond (... ...) (... ...) (t ...)) (setq files (cdr files)))
> (let ((attr-target ...) (is-dir ...) attr) (if (and ... ... ...) (error "%s: when %s multiple files, last argument must be a directory" command action)) (while files (setcar files ...) (cond ... ... ...) (setq files ...)))
> eshell-shuffle-files("cp" "copying" ("/home/fran/Devel/Emacs/Org/test.c") "/[puitg@ssh-leibniz.imag.fr]public_html/" copy-file nil t nil)
I've debugged it down to an error in eshell-shuffle-files. With XEmacs
21.4.20 and eshell from the XEmacs package repository, we have
((and attr-target
(or (not (eshell-under-windows-p))
(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))
(nth 11 attr-target) (nth 11 attr)
(= (nth 11 attr-target) (nth 11 attr)))
With GNU Emacs 23 and the builtin eshell from the CVS repository, where
it works, we have
((and attr-target
(or (not (eshell-under-windows-p))
(eq system-type 'ms-dos))
(setq attr (eshell-file-attributes (car files)))
(nth 10 attr-target) (nth 10 attr)
;; Use equal, not -, since the inode and the device could
;; cons cells.
(equal (nth 10 attr-target) (nth 10 attr))
(nth 11 attr-target) (nth 11 attr)
(equal (nth 11 attr-target) (nth 11 attr)))
So the error is already known (see the comment); XEmacs shall sync eshell.
Best regards, Michael.
next prev parent reply other threads:[~2007-10-31 20:30 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <mailman.2596.1193407255.18990.help-gnu-emacs@gnu.org>
2007-10-26 15:27 ` eshell/cp not able to use Tramp syntax ? Michael Albinus
2007-10-28 10:42 ` Bastien
2007-10-28 10:58 ` François Puitg
2007-10-31 20:30 ` Michael Albinus [this message]
2007-11-01 2:07 ` Bastien
2007-10-26 15:00 Bastien
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87mytz10yq.fsf@gmx.de \
--to=michael.albinus@gmx.de \
--cc=Francois.Puitg@imag.fr \
--cc=dto@gnu.org \
--cc=help-gnu-emacs@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.