distel and emacs unicode-2 (again)

Matthew D Swank <[email protected]> Sun, 03 Jun 2007 10:58:57 -0500
Newsgroups gmane.comp.lang.erlang.distel.devel
Message-ID <[email protected]>
I am still at a loss as to what is wrong when I try to use distel in emacs
23.x.  Could someone *please* give me some feed-back on what might be
wrong.

Here is a typical trace from running a command that needs to connect to a
node (in this case erl-process-list):

Debugger entered--Lisp error: (error "lucretia/-29892 Servname not supported for ai_socktype")
  make-network-process(:name "netfsm" :buffer #<buffer  *net-fsm*> :host "lucretia" :service -29892)
  open-network-stream("netfsm" #<buffer  *net-fsm*> "lucretia" -29892)
  (let ((p ...)) (set-process-coding-system p (quote no-conversion) (quote no-conversion)) p)
  (progn (let (...) (set-process-coding-system p ... ...) p))
  (prog1 (progn (let ... ... p)) (setq success t))
  (unwind-protect (prog1 (progn ...) (setq success t)) (unless success (kill-buffer buf)))
  (let (success) (unwind-protect (prog1 ... ...) (unless success ...)))
  (with-error-cleanup (kill-buffer buf) (let (...) (set-process-coding-system p ... ...) p))
  (let ((buf ...)) (with-error-cleanup (kill-buffer buf) (let ... ... p)))
  fsm-open-socket("lucretia" -29892)
  (let ((socket ...)) (fsm-attach socket state0 init-arg cont fail-cont buffer))
  (progn (let (...) (fsm-attach socket state0 init-arg cont fail-cont buffer)))
  (prog1 (progn (let ... ...)) (setq success t))
  (unwind-protect (prog1 (progn ...) (setq success t)) (unless success (funcall fail-cont)))
  (let (success) (unwind-protect (prog1 ... ...) (unless success ...)))
  (with-error-cleanup (funcall fail-cont) (let (...) (fsm-attach socket state0 init-arg cont fail-cont buffer)))
  fsm-connect("lucretia" -29892 derl-state0 casper@lucretia nil (lambda nil (kill-buffer #<buffer *derl casper@lucretia*>) (derl-nodedown (quote casper@lucretia))) #<buffer *derl casper@lucretia*>)
  (lambda (port) (fsm-connect "lucretia" port (function derl-state0) (quote casper@lucretia) nil (lambda nil ... ...) #<buffer *derl casper@lucretia*>))(-29892)
  funcall((lambda (port) (fsm-connect "lucretia" port (function derl-state0) (quote casper@lucretia) nil (lambda nil ... ...) #<buffer *derl casper@lucretia*>)) -29892)
  (progn (funcall cont result))
  (if cont (progn (funcall cont result)))
  (when cont (funcall cont result))
  (let ((cont fsm-cont)) (fsm-shutdown) (when cont (funcall cont result)))
  fsm-terminate(-29892)
  (cond ((member* event ...) (assert ...) (fsm-terminate ...)) ((member* event ...) (fsm-fail)) ((error "ecase failed: %s, %s" event ...) nil))
  (case event ((data) (assert ...) (fsm-terminate ...)) ((closed) (fsm-fail)) (ecase-error-flag))
  (ecase event ((data) (assert ...) (fsm-terminate ...)) ((closed) (fsm-fail)))
  epmd-recv-port-resp(data "\213<")
  funcall(epmd-recv-port-resp data "\213<")
  (progn (funcall fsm-state event arg))
  (prog1 (progn (funcall fsm-state event arg)) (setq success t))
  (unwind-protect (prog1 (progn ...) (setq success t)) (unless success (fsm-fail ...)))
  (let (success) (unwind-protect (prog1 ... ...) (unless success ...)))
  (with-error-cleanup (fsm-fail (format "Error on event %S in state %S" event fsm-state)) (funcall fsm-state event arg))
  fsm-event(data "\213<")
  fsm-deliver-data("\213<")
  (progn (fsm-deliver-data string))
  (if fsm-state (progn (fsm-deliver-data string)))
  (when fsm-state (fsm-deliver-data string))
  (save-current-buffer (set-buffer (process-buffer socket)) (when fsm-state (fsm-deliver-data string)))
  (with-current-buffer (process-buffer socket) (when fsm-state (fsm-deliver-data string)))
  fsm-filter(#<process netfsm> "\213<")
  execute-extended-command(nil)
  call-interactively(execute-extended-command)

Server was started with:  erl -R 9 -sname casper.

Once again, I would be grateful for any help.

Matt
-- 
"You do not really understand something unless you
 can explain it to your grandmother." — Albert Einstein.



-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Distel-hackers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/distel-hackers