Merge remote branch 'cloudant:fix-some-type-errors'
This closes #46
Signed-off-by: ILYA Khlopotov <iilyak@ca.ibm.com>
diff --git a/src/couch_mrview.erl b/src/couch_mrview.erl
index 3d06a1e..20eb4be 100644
--- a/src/couch_mrview.erl
+++ b/src/couch_mrview.erl
@@ -297,8 +297,8 @@
count_view_changes_since(Db, DDoc, VName, SinceSeq, Options) ->
Args0 = make_view_changes_args(Options),
- {ok, {_, View}, _, Args} = couch_mrview_util:get_view(Db, DDoc, VName,
- Args0),
+ {ok, {_Type, View, _Ref}, _, Args} = couch_mrview_util:get_view(
+ Db, DDoc, VName, Args0),
case View#mrview.seq_indexed of
true ->
OptList = make_view_changes_opts(SinceSeq, Options, Args),
diff --git a/src/couch_mrview_update_notifier.erl b/src/couch_mrview_update_notifier.erl
index 7c7ff1b..803d397 100644
--- a/src/couch_mrview_update_notifier.erl
+++ b/src/couch_mrview_update_notifier.erl
@@ -39,7 +39,7 @@
{ok, Fun}.
handle_call(_Request, State) ->
- {reply, ok, State}.
+ {ok, ok, State}.
handle_info({'EXIT', Pid, Reason}, Pid) ->
couch_log:error("View update notification process ~p died: ~p", [Pid, Reason]),