anchor.diff:  	%BelongsNames = [{B, belongs_to} || B <- BossRec:belongs_to_names()],
   	HasTypes = extract_has_types(RecType),
   	Excluded = case erlang:function_exported(RecType, json_dec_exclude, 1) of
  -		true -> BossRec:json_exlude();
  +		true -> BossRec:json_dec_exlude();
   		_ -> []
   	end,
   	AllNames = lists:append([Attrs, HasTypes]),
  
positive.code: -include("log.hrl").
  
  to_json(BossRec) ->
  	Mod = boss_db:type(BossRec:id()),
  
  	Exclude = case erlang:function_exported(Mod, json_enc_exclude, 1) of
  		true -> BossRec:json_exclude();
  		_ -> []
  	end,
  	Attr = BossRec:attributes(),
  
negative.code: 		{_, boolean} when Val; not Val ->
  			correct_types(Tail, Types, [H | Acc]);
  		{_, DahType} ->
  			?info("Skipping ~p: ~p as type ~p didn't sync up", [Key, Val, DahType]),
  			correct_types(Tail, Types, Acc)
  	end.
  
  