Hello again another Backtrace:
Signaling: (error "Unable to identify server code.")
signal(error ("Unable to identify server code."))
cerror("Unable to identify server code.")
apply(cerror "Unable to identify server code." nil)
error("Unable to identify server code.")
efs-process-scream-and-yell("229 Entering Extended Passive Mode (|||
53142|)")
efs-process-handle-line("229 Entering Extended Passive Mode (|||
53142|)" #<process "*ftp anonymous(a)ftp.xemacs.org*" pid 9639
state:run>)
efs-process-filter(#<process "*ftp anonymous(a)ftp.xemacs.org*" pid 9639
state:run> "229 Entering Extended Passive Mode (|||53142|)\n")
accept-process-output(#<process "*ftp anonymous(a)ftp.xemacs.org*" pid
9639 state:run>)
byte-code("..." [efs-process-nowait efs-process-busy proc
process-status (run open) accept-process-output] 2)
efs-raw-send-cmd(#<process "*ftp anonymous(a)ftp.xemacs.org*" pid 9639
state:run> "ls \"-al\" /root/tmp//efseMCvLV"
"Listing /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function (result line cont-lines host user proc cmd msg
pre-cont cont nowait noretry) "...(177)" [line result cmd nowait cont
retry fatal efs-send-cmd t 1 2 failed ... quote stor match-data ... nil
string-match efs-write-recover efs-host-type efs-call-cont host
afsc-result afsc-line afsc-cont-lines cont-lines noretry user msg
pre-cont case-fold-search cfs buff match-data efs-write-protect-msgs]
12> "ftp.xemacs.org" "anonymous" #<process "*ftp
anonymous(a)ftp.xemacs.org*" pid 9639 state:run> (dir ""
"/root/tmp//efseMCvLV" "-al")
"Listing /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function ... "...(267)" ... 13> unix unix:unknown
"ftp.xemacs.org" "anonymous" "/root/tmp//efseMCvLV"
"/pub/xemacs/packages/" "-al"
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/" "-al" parse t nil t
nil nil) nil nil) nil)
efs-send-cmd("ftp.xemacs.org" "anonymous" (dir ""
"/root/tmp//efseMCvLV" "-al")
"Listing /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function (result line cont-lines host-type listing-type
host user temp-file path switches file lsargs noparse parse noerror msg
nowait cont) "...(267)" [user listing cont temp-file lsargs host
get-buffer efs-ftp-process-buffer ... ascii ... efs-ls-dumb-check
unknown unix:unknown efs-call-cont nil efs-error "DIR failed: "
efs-ftp-path efs-add-file-entry efs-host-type fundamental-mode
get-buffer-create erase-buffer file-readable-p sleep-for
insert-file-contents format "list data file %s not readable"
efs-set-files efs-parse-listing buffer-string efs-add-to-ls-cache
efs-get-ls-converter assoc char-to-string 0 file conv listing-type buff
line path noerror nowait listing-result parse switches saved-buff
efs-process-client-altered-xfer-type ...] 13> unix unix:unknown
"ftp.xemacs.org" "anonymous" "/root/tmp//efseMCvLV"
"/pub/xemacs/packages/" "-al"
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/" "-al" parse t nil t
nil nil) nil)
#<compiled-function (result line cont-lines host-type listing-type
host user temp temp-file path switches file lsargs noparse parse
noerror msg nowait cont nlist) "...(93)" [path noerror msg user host
cont efs-call-cont nil efs-error format "CWD %s failed: " efs-send-cmd
nlist dir file-name-nondirectory t "Listing %s" efs-relativize-filename
#<compiled-function ... "...(267)" ... 13> lsargs file nowait result
line temp host-type listing-type temp-file switches noparse parse]
22>(nil "250 CWD command successful." "" unix unix:unknown
"ftp.xemacs.org" "anonymous" ("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV") "/root/tmp//efseMCvLV"
"/pub/xemacs/packages/"
"-al" "/anonymous@ftp.xemacs.org:/pub/xemacs/packages/"
"-al" parse t
nil t nil nil nil)
apply(#<compiled-function (result line cont-lines host-type
listing-type host user temp temp-file path switches file lsargs noparse
parse noerror msg nowait cont nlist) "...(93)" [path noerror msg user
host cont efs-call-cont nil efs-error format "CWD %s failed: "
efs-send-cmd nlist dir file-name-nondirectory t "Listing %s"
efs-relativize-filename #<compiled-function ... "...(267)" ... 13>
lsargs file nowait result line temp host-type listing-type temp-file
switches noparse parse] 22> (nil "250 CWD command successful." ""
unix
unix:unknown "ftp.xemacs.org" "anonymous"
("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV") "/root/tmp//efseMCvLV"
"/pub/xemacs/packages/"
"-al" "/anonymous@ftp.xemacs.org:/pub/xemacs/packages/"
"-al" parse t
nil t nil nil nil))
efs-call-cont((#<compiled-function (result line cont-lines host-type
listing-type host user temp temp-file path switches file lsargs noparse
parse noerror msg nowait cont nlist) "...(93)" [path noerror msg user
host cont efs-call-cont nil efs-error format "CWD %s failed: "
efs-send-cmd nlist dir file-name-nondirectory t "Listing %s"
efs-relativize-filename #<compiled-function ... "...(267)" ... 13>
lsargs file nowait result line temp host-type listing-type temp-file
switches noparse parse] 22> unix unix:unknown "ftp.xemacs.org"
"anonymous" ("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV")
"/root/tmp//efseMCvLV" "/pub/xemacs/packages/" "-al"
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/" "-al" parse t nil t
nil nil nil) nil "250 CWD command successful." "")
#<compiled-function (result line cont-lines host user proc cmd msg
pre-cont cont nowait noretry) "...(177)" [line result cmd nowait cont
retry fatal efs-send-cmd t 1 2 failed (append rename put) quote stor
match-data (...) nil string-match efs-write-recover efs-host-type
efs-call-cont host afsc-result afsc-line afsc-cont-lines cont-lines
noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12>(nil "250 CWD command successful." ""
"ftp.xemacs.org" "anonymous" #<process "*ftp
anonymous(a)ftp.xemacs.org*"
pid 9639 state:run> (cwd "/pub/xemacs/packages/") "CWD'ing
to /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function (result line cont-lines host-type listing-type
host user temp temp-file path switches file lsargs noparse parse
noerror msg nowait cont nlist) "...(93)" [path noerror msg user host
cont efs-call-cont nil efs-error format "CWD %s failed: " efs-send-cmd
nlist dir file-name-nondirectory t "Listing %s" efs-relativize-filename
#<compiled-function ... "...(267)" ... 13> lsargs file nowait result
line temp host-type listing-type temp-file switches noparse parse] 22>
unix unix:unknown "ftp.xemacs.org"
"anonymous" ("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV")
"/root/tmp//efseMCvLV" "/pub/xemacs/packages/" "-al"
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/" "-al" parse t nil t
nil nil nil) nil nil)
apply(#<compiled-function (result line cont-lines host user proc cmd
msg pre-cont cont nowait noretry) "...(177)" [line result cmd nowait
cont retry fatal efs-send-cmd t 1 2 failed (append rename put) quote
stor match-data (...) nil string-match efs-write-recover efs-host-type
efs-call-cont host afsc-result afsc-line afsc-cont-lines cont-lines
noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12> (nil "250 CWD command successful." ""
"ftp.xemacs.org" "anonymous" #<process "*ftp
anonymous(a)ftp.xemacs.org*"
pid 9639 state:run> (cwd "/pub/xemacs/packages/") "CWD'ing
to /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function ... "...(93)" ... 22> unix unix:unknown
"ftp.xemacs.org" "anonymous" ("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV") "/root/tmp//efseMCvLV"
"/pub/xemacs/packages/"
"-al" "/anonymous@ftp.xemacs.org:/pub/xemacs/packages/"
"-al" parse t
nil t nil nil nil) nil nil))
efs-call-cont((#<compiled-function (result line cont-lines host user
proc cmd msg pre-cont cont nowait noretry) "...(177)" [line result cmd
nowait cont retry fatal efs-send-cmd t 1 2 failed ... quote stor
match-data ... nil string-match efs-write-recover efs-host-type
efs-call-cont host afsc-result afsc-line afsc-cont-lines cont-lines
noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12> "ftp.xemacs.org" "anonymous"
#<process
"*ftp anonymous(a)ftp.xemacs.org*" pid 9639 state:run> (cwd
"/pub/xemacs/packages/") "CWD'ing
to /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function ... "...(93)" ... 22> unix unix:unknown
"ftp.xemacs.org" "anonymous" ("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV") "/root/tmp//efseMCvLV"
"/pub/xemacs/packages/"
"-al" "/anonymous@ftp.xemacs.org:/pub/xemacs/packages/"
"-al" parse t
nil t nil nil nil) nil nil) nil "250 CWD command successful." "")
efs-process-filter(#<process "*ftp anonymous(a)ftp.xemacs.org*" pid 9639
state:run> "250 CWD command successful.\nftp> ")
accept-process-output(#<process "*ftp anonymous(a)ftp.xemacs.org*" pid
9639 state:run>)
byte-code("..." [efs-process-nowait efs-process-busy proc
process-status (run open) accept-process-output] 2)
efs-raw-send-cmd(#<process "*ftp anonymous(a)ftp.xemacs.org*" pid 9639
state:run> "quote cwd /pub/xemacs/packages/." "CWD'ing
to /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function (result line cont-lines host user proc cmd msg
pre-cont cont nowait noretry) "...(177)" [line result cmd nowait cont
retry fatal efs-send-cmd t 1 2 failed ... quote stor match-data ... nil
string-match efs-write-recover efs-host-type efs-call-cont host
afsc-result afsc-line afsc-cont-lines cont-lines noretry user msg
pre-cont case-fold-search cfs buff match-data efs-write-protect-msgs]
12> "ftp.xemacs.org" "anonymous" #<process "*ftp
anonymous(a)ftp.xemacs.org*" pid 9639 state:run> (cwd
"/pub/xemacs/packages/") "CWD'ing
to /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function ... "...(93)" ... 22> unix unix:unknown
"ftp.xemacs.org" "anonymous" ("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV") "/root/tmp//efseMCvLV"
"/pub/xemacs/packages/"
"-al" "/anonymous@ftp.xemacs.org:/pub/xemacs/packages/"
"-al" parse t
nil t nil nil nil) nil nil) nil)
efs-send-cmd("ftp.xemacs.org" "anonymous" (cwd
"/pub/xemacs/packages/") "CWD'ing
to /anonymous@ftp.xemacs.org:/pub/xemacs/packages/" nil
(#<compiled-function (result line cont-lines host-type listing-type
host user temp temp-file path switches file lsargs noparse parse
noerror msg nowait cont nlist) "...(93)" [path noerror msg user host
cont efs-call-cont nil efs-error format "CWD %s failed: " efs-send-cmd
nlist dir file-name-nondirectory t "Listing %s" efs-relativize-filename
#<compiled-function ... "...(267)" ... 13> lsargs file nowait result
line temp host-type listing-type temp-file switches noparse parse] 22>
unix unix:unknown "ftp.xemacs.org"
"anonymous" ("/root/tmp//efseMCvLV" .
"/root/tmp//efseMCvLV")
"/root/tmp//efseMCvLV" "/pub/xemacs/packages/" "-al"
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/" "-al" parse t nil t
nil nil nil) nil)
efs-ls("/anonymous@ftp.xemacs.org:/pub/xemacs/packages/" "-al" t
parse
nil)
efs-get-files("/anonymous@ftp.xemacs.org:/pub/xemacs/packages/")
efs-get-file-entry("/anonymous@ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.gpg")
#<compiled-function (path) "...(7)" [path efs-get-file-entry t]
2>("/anonymous@ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.gpg")
apply(#<compiled-function (path) "...(7)" [path efs-get-file-entry t]
2>
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.gpg")
efs-internal-file-exists-p(unix
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.gpg")
efs-file-exists-p("/anonymous@ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.gpg")
apply(efs-file-exists-p
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.gpg")
efs-file-handler-function(file-exists-p
"/anonymous@ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.gpg")
file-exists-p("/anonymous@ftp.xemacs.org:pub/xemacs/packages/package-index.LATEST.gpg")
package-get-locate-file("package-index.LATEST.gpg" t nil)
package-get-locate-index-file(nil)
(let ((dflt ...)) (list (read-file-name "Load package-get database:
" ... dflt t ...)))
call-interactively(package-get-update-base)
recursive-edit()
byte-code("..." [print-escape-newlines print-length debugger-buffer
debugger-value standard-output debugger-args pop-to-buffer erase-buffer
t 50 backtrace debugger-mode re-search-forward "\n[* ] debug(" 1
debugger-reenable (lambda debug) "Entering:\n" debug backtrace-debug 3
delete-char ?* 0 exit "Return value: " prin1 ?\n ?\ error "Signaling:
" "Beginning evaluation of function call form:\n" nil message ""
recursive-edit buffer-read-only inhibit-trace] 3)
debug(error (wrong-type-argument stringp nil))
find-file-name-handler(nil insert-file-contents-literally)
insert-file-contents-literally(nil)
package-get-locate-index-file(nil)
(let ((dflt ...)) (list (read-file-name "Load package-get database:
" ... dflt t ...)))
call-interactively(package-get-update-base)
Greetings Werner