anchor.diff:  enc_cmd(R) when is_record(R, rad_challenge) ->
       Def = #rad_challenge{},
       {?Val_Packet_Type_Access_Challenge,
  -     [enc_attrib(#rad_challenge.state,   R, Def, ?State,           binary),
  +     [enc_attrib(#rad_challenge.state,   R, Def, ?State,           octets),
         lists:map(fun(RM) -> <<?Reply_Message:8, (size(RM)+2):8, RM/binary>> end,
   		R#rad_challenge.reply_msgs)]
       };
  
positive.code:     {?Val_Packet_Type_Accounting_Request,
       [enc_attrib(#rad_accreq.status_type, R, Def, ?Acct_Status_Type,     integer),
        enc_attrib(#rad_accreq.session_time,R, Def, ?Acct_Session_Time,    integer),
        enc_attrib(#rad_accreq.session_id,  R, Def, ?Acct_Session_Id,      binary),
        enc_attrib(#rad_accreq.term_cause,  R, Def, ?Acct_Terminate_Cause, integer),
        enc_attrib(#rad_accreq.user,        R, Def, ?User_Name,       binary),
        enc_attrib(#rad_accreq.nas_ip,      R, Def, ?NAS_IP_Address,  ipaddr),
        enc_std_attrs(R),
        enc_vendor_attrs(R)
  
negative.code: enc_cmd(R) when is_record(R, rad_request) ->
      Def = #rad_request{},
      {?Val_Packet_Type_Access_Request,
       [enc_attrib(#rad_request.user,      R, Def, ?User_Name,       string),
        enc_attrib(#rad_request.passwd,    R, Def, ?User_Password,     string),
        enc_attrib(#rad_request.nas_ip,    R, Def, ?NAS_IP_Address,  ipaddr),
        enc_attrib(#rad_request.state,     R, Def, ?State,           octets)
       ]};
  enc_cmd(R) when is_record(R, rad_accept) ->
      Def = #rad_accept{},
      {?Val_Packet_Type_Access_Accept,
       [enc_attrib(#rad_accept.user,        R, Def, ?User_Name,       string),
        lists:map(fun(RM) ->
  			<<?Vendor_Specific:8, (size(RM)+2):8, RM/binary>>
  		end,
  