anchor.diff:  
   modify_password(Handle, Dn, NewPasswd, OldPasswd)
     when is_pid(Handle), is_list(Dn), is_list(NewPasswd), is_list(OldPasswd) ->
  -    send(Handle, {passwd_modify,optional(Dn),optional(NewPasswd),optional(OldPasswd)}),
  +    modify_password(Handle, Dn, NewPasswd, OldPasswd, asn1_NOVALUE).
  +
  +modify_password(Handle, Dn, NewPasswd, OldPasswd, Controls)
  +  when is_pid(Handle), is_list(Dn), is_list(NewPasswd), is_list(OldPasswd) ->
  +    send(Handle, {passwd_modify,optional(Dn),optional(NewPasswd),optional(OldPasswd),Controls}),
       recv(Handle).
   
   %%% --------------------------------------------------------------------
  
positive.code: loop(Cpid, Data) ->
      receive
  
  	{From, {search, A}} ->
  	    {Res,NewData} = do_search(Data, A),
  	    send(From,Res),
  	    ?MODULE:loop(Cpid, NewData);
  
  	{From, {modify, Obj, Mod}} ->
  	    {Res,NewData} = do_modify(Data, Obj, Mod),
  	    send(From,Res),
  	    ?MODULE:loop(Cpid, NewData);
  
  	{From, {modify_dn, Obj, NewRDN, DelOldRDN, NewSup}} ->
  	    {Res,NewData} = do_modify_dn(Data, Obj, NewRDN, DelOldRDN, NewSup),
  	    send(From,Res),
  	    ?MODULE:loop(Cpid, NewData);
  
  	{From, {add, Entry, Attrs}} ->
  	    {Res,NewData} = do_add(Data, Entry, Attrs),
  	    send(From,Res),
  	    ?MODULE:loop(Cpid, NewData);
  
  
negative.code: %%% See MIT-LICENSE at the top dir for licensing information.
  %%% --------------------------------------------------------------------
  -vc('$Id$ ').
  -export([open/1, open/2,
  	 simple_bind/3, simple_bind/4,
  	 controlling_process/2,
  	 start_tls/2, start_tls/3, start_tls/4,
           modify_password/3, modify_password/4, modify_password/5,
  	 getopts/2,
  	 baseObject/0,singleLevel/0,wholeSubtree/0,close/1,
  	 equalityMatch/2,greaterOrEqual/2,lessOrEqual/2,
  	 extensibleMatch/2,
  	 search/2, search/3,
  	 approxMatch/2,substrings/2,present/1,
  	 'and'/1,'or'/1,'not'/1,mod_add/2, mod_delete/2,
  	 mod_replace/2,
  	 modify/3, modify/4,
  	 add/3, add/4,
  	 delete/2, delete/3,
  	 modify_dn/5,parse_dn/1,
  	 parse_ldap_url/1]).
  