From 9b424fec2bf84a8aac79d021ba02598af28da04d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= <essen@ninenines.eu>
Date: Wed, 6 May 2015 17:24:55 +0300
Subject: Dialyzer fixes in cowboy_clock

This is what I get for merging blindly!

and

Fix a compile error introduced in previous commit

(cherry-pick)
---
 src/cowboy_clock.erl | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'src')

diff --git a/src/cowboy_clock.erl b/src/cowboy_clock.erl
index c81b486..5d9a41a 100644
--- a/src/cowboy_clock.erl
+++ b/src/cowboy_clock.erl
@@ -36,7 +36,7 @@
 -record(state, {
 	universaltime = undefined :: undefined | calendar:datetime(),
 	rfc1123 = <<>> :: binary(),
-	tref = undefined :: undefined | timer:tref()
+	tref = undefined :: undefined | reference()
 }).
 
 %% API.
@@ -69,11 +69,11 @@ init([]) ->
 	ets:insert(?MODULE, {rfc1123, B}),
 	{ok, #state{universaltime=T, rfc1123=B, tref=TRef}}.
 
--spec handle_call(any(), _, State)
-	-> {reply, ignored, State} | {stop, normal, stopped, State}
+-type from() :: {pid(), term()}.
+-spec handle_call
+	(stop, from(), State) -> {stop, normal, stopped, State}
 	when State::#state{}.
-handle_call(stop, _From, State=#state{tref=TRef}) ->
-	{ok, cancel} = timer:cancel(TRef),
+handle_call(stop, _From, State) ->
 	{stop, normal, stopped, State};
 handle_call(_Request, _From, State) ->
 	{reply, ignored, State}.
@@ -85,7 +85,7 @@ handle_cast(_Msg, State) ->
 -spec handle_info(any(), State) -> {noreply, State} when State::#state{}.
 handle_info(update, #state{universaltime=Prev, rfc1123=B1, tref=TRef0}) ->
 	%% Cancel the timer in case an external process sent an update message.
-	erlang:cancel_timer(TRef0),
+	_ = erlang:cancel_timer(TRef0),
 	T = erlang:universaltime(),
 	B2 = update_rfc1123(B1, Prev, T),
 	ets:insert(?MODULE, {rfc1123, B2}),
-- 
cgit v1.2.3