anchor.diff:  handle_analyze_req(#httpd{method='GET'}=Req) ->
       Analyzer = couch_httpd:qs_value(Req, "analyzer"),
       Text = couch_httpd:qs_value(Req, "text"),
  -    analyze(Req, ?l2b(Analyzer), ?l2b(Text));
  +    analyze(Req, Analyzer, Text);
   handle_analyze_req(#httpd{method='POST'}=Req) ->
       couch_httpd:validate_ctype(Req, "application/json"),
       {Fields} = chttpd:json_body_obj(Req),
  
positive.code:     case Text of
          undefined ->
              throw({bad_request, "text parameter is mandatory"});
          _ when is_binary(Text) ->
              ok;
          _ ->
              throw({bad_request, "text parameter must be a string"})
      end,
      case clouseau_rpc:analyze(Analyzer, Text) of
          {ok, Tokens} ->
              send_json(Req, 200, {[{tokens, Tokens}]});
          {error, Reason} ->
  
negative.code:     case Analyzer of
          undefined ->
              throw({bad_request, "analyzer parameter is mandatory"});
          _ when is_list(Analyzer) ->
              ok;
          {[_|_]} ->
              ok;
  