summaryrefslogtreecommitdiff
path: root/src/couch/src/couch_doc.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/couch/src/couch_doc.erl')
-rw-r--r--src/couch/src/couch_doc.erl8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/couch/src/couch_doc.erl b/src/couch/src/couch_doc.erl
index 2a2b4db68..4a49372c7 100644
--- a/src/couch/src/couch_doc.erl
+++ b/src/couch/src/couch_doc.erl
@@ -179,12 +179,12 @@ parse_rev(Rev) when is_list(Rev) ->
SplitRev = lists:splitwith(fun($-) -> false; (_) -> true end, Rev),
case SplitRev of
{Pos, [$- | RevId]} ->
- IntPos = try list_to_integer(Pos) of
- Val -> Val
+ try
+ IntPos = list_to_integer(Pos),
+ {IntPos, parse_revid(RevId)}
catch
error:badarg -> throw({bad_request, <<"Invalid rev format">>})
- end,
- {IntPos, parse_revid(RevId)};
+ end;
_Else -> throw({bad_request, <<"Invalid rev format">>})
end;
parse_rev(_BadRev) ->