anchor.diff:              couch_util:get_value(<<"enabled">>, Opts, true)
       end.
   
  +get_array_length_enabled(Props) ->
  +    case couch_util:get_value(<<"array_length_field">>, Props, {[]}) of
  +        Bool when is_boolean(Bool) ->
  +            Bool;
  +        _ ->
  +            true
  +    end.
   
   add_default_text_field(Fields) ->
       DefaultFields = add_default_text_field(Fields, []),
  
positive.code:     get_text_field_values_obj(Props, TAcc, []);
  
  get_text_field_values(Values, TAcc) when is_list(Values) ->
      NewPath = ["[]" | TAcc#tacc.path],
      NewTAcc = TAcc#tacc{path = NewPath},
      % We bypass make_text_field and directly call make_text_field_name
      % because the length field name is not part of the path.
      LengthFieldName = make_text_field_name(NewTAcc#tacc.path, <<"length">>),
      LengthField = [{LengthFieldName, <<"length">>, length(Values)}],
      get_text_field_values_arr(Values, NewTAcc, LengthField);
  
  get_text_field_values(Bin, TAcc) when is_binary(Bin) ->
      make_text_field(TAcc, <<"string">>, Bin);
  
  
negative.code: get_text_field_values_obj([], _, FAcc) ->
      FAcc;
  get_text_field_values_obj([{Key, Val} | Rest], TAcc, FAcc) ->
  	ArrayLengthFieldEnabled = TAcc#tacc.array_length_field,
      NewPath = [Key | TAcc#tacc.path],
      NewTAcc = TAcc#tacc{array_length_field = ArrayLengthFieldEnabled, path = NewPath},
      Fields = get_text_field_values(Val, NewTAcc),
      get_text_field_values_obj(Rest, TAcc, Fields ++ FAcc).
  
  