Browse Source

Rename private function quality/2 into qvalue/2

Loïc Hoguin 13 years ago
parent
commit
819eb219e7
1 changed files with 15 additions and 15 deletions
  1. 15 15
      src/cowboy_http.erl

+ 15 - 15
src/cowboy_http.erl

@@ -119,7 +119,7 @@ media_range_param_attr(Data, Fun, Type, SubType, Acc) ->
 -spec media_range_param_value(binary(), fun(), binary(), binary(),
 	[{binary(), binary()}], binary()) -> any().
 media_range_param_value(Data, Fun, Type, SubType, Acc, <<"q">>) ->
-	quality(Data,
+	qvalue(Data,
 		fun (Rest, Quality) ->
 			accept_ext(Rest, Fun, Type, SubType, Acc, Quality, [])
 		end);
@@ -247,30 +247,30 @@ quoted_string(<< C, Rest/bits >>, Fun, Acc) ->
 	quoted_string(Rest, Fun, << Acc/binary, C >>).
 
 %% @doc Parse a quality value.
--spec quality(binary(), fun()) -> any().
-quality(<< $0, $., Rest/bits >>, Fun) ->
-	quality(Rest, Fun, 0, 100);
-quality(<< $0, Rest/bits >>, Fun) ->
+-spec qvalue(binary(), fun()) -> any().
+qvalue(<< $0, $., Rest/bits >>, Fun) ->
+	qvalue(Rest, Fun, 0, 100);
+qvalue(<< $0, Rest/bits >>, Fun) ->
 	Fun(Rest, 0);
-quality(<< $1, $., $0, $0, $0, Rest/bits >>, Fun) ->
+qvalue(<< $1, $., $0, $0, $0, Rest/bits >>, Fun) ->
 	Fun(Rest, 1000);
-quality(<< $1, $., $0, $0, Rest/bits >>, Fun) ->
+qvalue(<< $1, $., $0, $0, Rest/bits >>, Fun) ->
 	Fun(Rest, 1000);
-quality(<< $1, $., $0, Rest/bits >>, Fun) ->
+qvalue(<< $1, $., $0, Rest/bits >>, Fun) ->
 	Fun(Rest, 1000);
-quality(<< $1, Rest/bits >>, Fun) ->
+qvalue(<< $1, Rest/bits >>, Fun) ->
 	Fun(Rest, 1000);
-quality(_Data, _Fun) ->
+qvalue(_Data, _Fun) ->
 	{error, badarg}.
 
--spec quality(binary(), fun(), integer(), 1 | 10 | 100) -> any().
-quality(Data, Fun, Q, 0) ->
+-spec qvalue(binary(), fun(), integer(), 1 | 10 | 100) -> any().
+qvalue(Data, Fun, Q, 0) ->
 	Fun(Data, Q);
-quality(<< C, Rest/bits >>, Fun, Q, M)
+qvalue(<< C, Rest/bits >>, Fun, Q, M)
 		when C =:= $0; C =:= $1; C =:= $2; C =:= $3; C =:= $4;
 			 C =:= $5; C =:= $6; C =:= $7; C =:= $8; C =:= $9 ->
-	quality(Rest, Fun, Q + (C - $0) * M, M div 10);
-quality(Data, Fun, Q, _M) ->
+	qvalue(Rest, Fun, Q + (C - $0) * M, M div 10);
+qvalue(Data, Fun, Q, _M) ->
 	Fun(Data, Q).
 
 %% Interpretation.