Skip to content

Commit

Permalink
some more doc. added some text to some error messages.
Browse files Browse the repository at this point in the history
git-svn-id: https://distel.googlecode.com/svn/trunk@67 d5f8e727-742a-0410-b67d-dd739a6cc792
  • Loading branch information
massemanet committed Jun 26, 2008
1 parent 7c48f5b commit 4c9fd2c
Show file tree
Hide file tree
Showing 4 changed files with 24 additions and 4 deletions.
5 changes: 4 additions & 1 deletion AUTHORS
Original file line number Diff line number Diff line change
Expand Up @@ -4,5 +4,8 @@ Luke Gorrie <luke@bluetail.com>
Vladimir Sekissov <svg@surnet.ru> (dilber)
David Wallin <david.wallin@ul.ie> (distel-ie)
Darius Bacon <darius@accesscom.com> (design and doc advice)
Mats Cronqvist <etxmacr@cbe.ericsson.se> (debugger patches)
Mats Cronqvist <masse@cronqvi.st> (debugger patches, otp_doc)
Martin Bj�rklund <mbj@bluetail.com> (major debugger hacking)
Bill Clementson (this and that)
Matthias Radestock (who-calls)
Dimitris Dinodimos (emacs-23-unicode)
12 changes: 12 additions & 0 deletions README
Original file line number Diff line number Diff line change
Expand Up @@ -72,3 +72,15 @@ https://lists.sourceforge.net/lists/listinfo/distel-hackers

and the issue tracker at google;
http://code.google.com/p/distel

FAQ
1. Can't handle event closed in state derl-recv-challenge-ack

this is what you get if the erlang node and the distel node disagree
one what cookie to use.

Use (in erl)
erlang:get_cookie()
and (in emacs)
M-x erl-get-cookie
to check the cookies.
3 changes: 3 additions & 0 deletions elisp/derl.el
Original file line number Diff line number Diff line change
Expand Up @@ -179,6 +179,9 @@ Use the distribution protocol's EXIT2 message."
(defun derl-recv-challenge-ack (event data)
"Receive and check challenge ack. If it's OK then the handshake is
complete and we become live."
(if (equal event 'closed)
(message "Distel thinks the cookie is %s. Erlang seems to disagree."
(erl-cookie)))
(check-event event 'data)
(when (derl-have-msg)
(goto-char (point-min))
Expand Down
8 changes: 5 additions & 3 deletions elisp/erl.el
Original file line number Diff line number Diff line change
Expand Up @@ -53,9 +53,11 @@
(defun erl-determine-hostname ()
"Figure out the short-names hostname."
(let ((fqdn (system-name)))
(if (string-match "[^\\.]+" fqdn)
(match-string 0 fqdn)
(error "erl: Can't determine hostname."))))
(if (string-match "\\.local$" fqdn)
fqdn
(if (string-match "[^\\.]+" fqdn)
(match-string 0 fqdn)
(error "erl: Can't determine hostname.")))))

(when (null erl-node-name)
(setq erl-node-name
Expand Down

0 comments on commit 4c9fd2c

Please sign in to comment.