anchor.diff:  
   decrypt_config_file(EncryptFileName, TargetFileName, {key,Key}) ->
       crypto:start(),
  -    {K1,K2,K3,IVec} = make_crypto_key(Key),
  +    {Key,IVec} = make_crypto_key(Key),
       case file:read_file(EncryptFileName) of
   	{ok,Bin} ->
  -	    DecBin = crypto:des3_cbc_decrypt(K1, K2, K3, IVec, Bin),
  +	    DecBin = crypto:block_decrypt(des3_cbc, Key, IVec, Bin),
   	    case catch binary_to_term(DecBin) of
   		{'EXIT',_} ->
   		    {error,bad_file};
  
positive.code: 		       0 -> Bin1;
  		       N -> list_to_binary([Bin1,random_bytes(8-N)])
  		   end,
  	    EncBin = crypto:des3_cbc_encrypt(K1, K2, K3, IVec, Bin2),
  	    case file:write_file(EncryptFileName, EncBin) of
  		ok ->
  		    io:format("~ts --(encrypt)--> ~ts~n",
  
negative.code: make_crypto_key(String) ->
      <<K1:8/binary,K2:8/binary>> = First = erlang:md5(String),
      <<K3:8/binary,IVec:8/binary>> = erlang:md5([First|lists:reverse(String)]),
      {[K1,K2,K3],IVec}.
  
  random_bytes(N) ->
      {A,B,C} = now(),
  