I tried to use `C' in dired to copy a file over an efs link. It
worked the other day before I ran a cvs update of my packages tree,
so perhaps a recent change has brought this?
I will try and debug it some, but in the meantime, here's a
stacktrace for the experts. Let me know if you have already solved
this one, please.
Signaling: (invalid-function (macro . #<compiled-function (function) "...(4)"
[ad-get-advice-info function] 2>))
ad-is-advised(dired-call-process)
efs-overwrite-fn("efs" dired-call-process)
byte-code("..." [boundp MULE featurep mule load "efs-dired-mule" put
dired-print-file efs efs-dired-print-file dired-make-compressed-filename
efs-dired-make-compressed-filename dired-compress-file efs-dired-compress-file
dired-recursive-delete-directory efs-dired-recursive-delete-directory dired-uncache
efs-dired-uncache dired-shell-call-process efs-dired-shell-call-process
dired-shell-unhandle-file-name efs-dired-shell-unhandle-file-name dired-file-modtime
efs-dired-file-modtime dired-set-file-modtime efs-dired-set-file-modtime efs-overwrite-fn
"efs" dired-call-process dired-insert-headerline dired-manual-move-to-filename
dired-manual-move-to-end-of-filename dired-make-filename-string dired-flag-backup-files
dired-create-files dired-find-file dired-find-file-other-window
dired-find-file-other-frame dired-collect-file-versions dired-file-name-lessp add-hook
dired-before-readin-hook efs-dired-before-readin dired-grep
dired-grep-delete-local-temp-file efs-diff/grep-del-temp-fi!
le dired-grep-load-hook #<compiled-function nil "...(6)" [efs-overwrite-fn
"efs" dired-grep-delete-local-temp-file efs-diff/grep-del-temp-file] 4>] 4)
load-internal("efs-dired" nil t nil nil nil)
load("efs-dired" nil t nil)
require(efs-dired)
byte-code("..." [efs-fix-path intern symbol-name vms efs-key-obarray put
#<compiled-function (&rest args) "...(51)" [intern symbol-name vms
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-vms" error
"%s definition of %s is not defined by loading %s" apply args] 5> mts
#<compiled-function (&rest args) "...(51)" [intern symbol-name mts
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-mts" error
"%s definition of %s is not defined by loading %s" apply args] 5> cms
#<compiled-function (&rest args) "...(51)" [intern symbol-name cms
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-cms" error
"%s definition of %s is not defined by loading %s" apply args] 5> ti-explorer
#<compiled-function (&rest args) "...(51)" [intern symbol-name
ti-explorer efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load
"efs-ti-explorer" error "%s definition of %s is not defined by loading
%s" apply args] 5> ti-twenex #<compiled-function (&rest args)
"...(51)" [intern symbol-name ti-twen!
ex efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-ti-twenex"
error "%s definition of %s is not defined by loading %s" apply args] 5> dos
#<compiled-function (&rest args) "...(51)" [intern symbol-name dos
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-pc" error
"%s definition of %s is not defined by loading %s" apply args] 5> mvs
#<compiled-function (&rest args) "...(51)" [intern symbol-name mvs
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-mvs" error
"%s definition of %s is not defined by loading %s" apply args] 5> tops-20
#<compiled-function (&rest args) "...(51)" [intern symbol-name tops-20
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-tops-20" error
"%s definition of %s is not defined by loading %s" apply args] 5> mpe
#<compiled-function (&rest args) "...(51)" [intern symbol-name mpe
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-mpe" error
"%s definition of %s is not defined by loading %s" apply args] 5> os2
#<compiled-functio!
n (&rest args) "...(51)" [intern symbol-name os2 efs-key-obarray
"tmp1" tmp1 qkey efs-fix-path load "efs-pc" error "%s definition
of %s is not defined by loading %s" apply args] 5> vos #<compiled-function
(&rest args) "...(51)" [intern symbol-name vos efs-key-obarray
"tmp1" tmp1 qkey efs-fix-path load "efs-vos" error "%s definition
of %s is not defined by loading %s" apply args] 5> ms-unix #<compiled-function
(&rest args) "...(51)" [intern symbol-name ms-unix efs-key-obarray
"tmp1" tmp1 qkey efs-fix-path load "efs-ms-unix" error "%s
definition of %s is not defined by loading %s" apply args] 5> netware
#<compiled-function (&rest args) "...(51)" [intern symbol-name netware
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-netware" error
"%s definition of %s is not defined by loading %s" apply args] 5> cms-knet
#<compiled-function (&rest args) "...(51)" [intern symbol-name cms-knet
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-cms-knet"
error "%s definition of %s !
is not defined by loading %s" apply args] 5> guardian #<compiled-function
(&rest args) "...(51)" [intern symbol-name guardian efs-key-obarray
"tmp1" tmp1 qkey efs-fix-path load "efs-guardian" error "%s
definition of %s is not defined by loading %s" apply args] 5> nos-ve
#<compiled-function (&rest args) "...(51)" [intern symbol-name nos-ve
efs-key-obarray "tmp1" tmp1 qkey efs-fix-path load "efs-nos-ve" error
"%s definition of %s is not defined by loading %s" apply args] 5>
efs-fix-dir-path #<compiled-function (&rest args) "...(51)" [intern
symbol-name vms efs-key-obarray "tmp1" tmp1 qkey efs-fix-dir-path load
"efs-vms" error "%s definition of %s is not defined by loading %s"
apply args] 5> #<compiled-function (&rest args) "...(51)" [intern
symbol-name mts efs-key-obarray "tmp1" tmp1 qkey efs-fix-dir-path load
"efs-mts" error "%s definition of %s is not defined by loading %s"
apply args] 5> #<compiled-function (&rest args) "...(51)" [intern
symbol-name cms efs-key-obarray "tmp1"!
tmp1 qkey efs-fix-dir-path load "efs-cms" error "%s definition of %s is
not defined by loading %s" apply args] 5> #<compiled-function (&rest args)
"...(51)" [intern symbol-name ti-explorer efs-key-obarray "tmp1" tmp1
qkey efs-fix-dir-path load "efs-ti-explorer" error "%s definition of %s is
not defined by loading %s" apply args] 5> #<compiled-function (&rest args)
"...(51)" [intern symbol-name ti-twenex efs-key-obarray "tmp1" tmp1
qkey efs-fix-dir-path load "efs-ti-twenex" error "%s definition of %s is
not defined by loading %s" apply args] 5> #<compiled-function (&rest args)
"...(51)" [intern symbol-name dos efs-key-obarray "tmp1" tmp1 qkey
efs-fix-dir-path load "efs-pc" error "%s definition of %s is not defined by
loading %s" apply args] 5> #<compiled-function (&rest args)
"...(51)" [intern symbol-name mvs efs-key-obarray "tmp1" tmp1 qkey
efs-fix-dir-path load "efs-mvs" error "%s definition of %s is not defined
by loading %s" apply args] 5> #<compiled-function (&rest args) !
"...(51)" [intern symbol-name tops-20 efs-key-obarray "tmp1" tmp1 qkey
efs-fix-dir-path load "efs-tops-20" error "%s definition of %s is not
defined by loading %s" apply args] 5> #<compiled-function (&rest args)
"...(51)" [intern symbol-name mpe efs-key-obarray "tmp1" tmp1 qkey
efs-fix-dir-path load "efs-mpe" error "%s definition of %s is not defined
by loading %s" apply args] 5> #<compiled-function (&rest args)
"...(51)" [intern symbol-name os2 efs-key-obarray "tmp1" tmp1 qkey
efs-fix-dir-path load "efs-pc" error "%s definition of %s is not defined by
loading %s" apply args] 5> #<compiled-function (&rest args)
"...(51)" [intern symbol-name vos efs-key-obarray "tmp1" tmp1 qkey
efs-fix-dir-path load "efs-vos" error "%s definition of %s is not defined
by loading %s" apply args] 5> hell ...] 7)
load-internal("efs" nil nil nil nil nil)
load("efs" nil nil nil)
apply(load ("efs" nil nil nil))
dired-handler-fn(load "efs" nil nil nil)
load-internal("efs" nil nil nil nil nil)
load("efs" nil nil nil)
efs-file-handler-function(substitute-in-file-name "/ia:~/public_html/")
substitute-in-file-name("/ia:~/public_html/")
apply(substitute-in-file-name "/ia:~/public_html/")
dired-handler-fn(substitute-in-file-name "/ia:~/public_html/")
substitute-in-file-name("/ia:~/public_html/")
read-file-name-2(file-name-history "Copy [-p] backup-cvs-work to: "
"/etc/cron.scripts/" nil nil nil read-file-name-internal)
read-file-name-1(file-name-history "Copy [-p] backup-cvs-work to: "
"/etc/cron.scripts/" nil nil nil read-file-name-internal)
read-file-name("Copy [-p] backup-cvs-work to: "
"/etc/cron.scripts/")
apply(read-file-name ("Copy [-p] backup-cvs-work to: "
"/etc/cron.scripts/"))
dired-mark-pop-up(nil copy ("backup-cvs-work") read-file-name "Copy [-p]
backup-cvs-work to: " "/etc/cron.scripts/")
dired-mark-read-file-name("Copy [-p] %s to: " "/etc/cron.scripts/"
copy nil ("backup-cvs-work"))
dired-do-create-files(copy dired-copy-file "Copy [-p]" nil ?C)
dired-do-copy(nil)
call-interactively(dired-do-copy)
Show replies by date