commit 69d30df9ac93976743c3decf56c471508cb6f897
author Adam Kocoloski <adam@cloudant.com> Sat Jul 10 15:50:17 2010 -0400
committer Adam Kocoloski <adam@cloudant.com> Sat Jul 10 15:50:17 2010 -0400
tree db056a650d16e5d14b65c764233db559a1564839
parent 6c1079a922a4d96d6dca101e1a7d68a93f5b8c7c

thank you dialyzer

src/rexi.erl

diff --git a/src/rexi.erl b/src/rexi.erl
index 8f1d72b..2125021 100644
--- a/src/rexi.erl
+++ b/src/rexi.erl
@@ -16,7 +16,7 @@
     stop(), start().
 
 %% @equiv cast(Node, self(), MFA)
--spec cast(node(), mfa()) -> reference().
+-spec cast(node(), {atom(), atom(), list()}) -> reference().
 cast(Node, MFA) ->
     cast(Node, self(), MFA).
 
@@ -27,7 +27,7 @@
 %% Second, the remote process is monitored. If it exits with a Reason other
 %% than normal, Caller will receive a message of the form
 %% `{Ref, {rexi_EXIT, Reason}}' where Ref is the returned reference.
--spec cast(node(), pid(), mfa()) -> reference().
+-spec cast(node(), pid(), {atom(), atom(), list()}) -> reference().
 cast(Node, Caller, MFA) ->
     Ref = make_ref(),
     ok = gen_server:cast({?SERVER, Node}, {doit, {Caller,Ref}, MFA}),

src/rexi_server.erl

diff --git a/src/rexi_server.erl b/src/rexi_server.erl
index 127e088..70296d5 100644
--- a/src/rexi_server.erl
+++ b/src/rexi_server.erl
@@ -53,7 +53,7 @@
     {ok, St}.
 
 %% @doc initializes a process started by rexi_server.
--spec init_p({pid(),reference()}, mfa()) -> any().
+-spec init_p({pid(), reference()}, {atom(), atom(), list()}) -> any().
 init_p(From, {M,F,A}) ->
     put(rexi_from, From),
     try apply(M, F, A) catch _:Reason -> exit(Reason) end.