anchor.diff:      s3_upload_single(Key, Binary).
   
   s3_upload_single(Key, Value) ->
  -    A = erlcloud_s3:configure(yaml_get("ACCESS_KEY",?ACCESS_KEY), yaml_get("SECRECT_ACCESS_KEY",?SECRET_ACCESS_KEY)),
  +    A = erlcloud_s3:configure(yaml_get("ACCESS_KEY",?ACCESS_KEY), yaml_get("SECRET_ACCESS_KEY",?SECRET_ACCESS_KEY)),
       error_logger:info_msg("~p:~p Settng up AWS ~p to S3 ~n", 
                 [?MODULE, ?LINE, A]),
       %R = erlcloud_s3:put_object(yaml_get("S3_BUCKET",?S3_BUCKET), Key, Value, [], [{"Content-type", "application/x-gzip"}]),
  
positive.code: register_with_elb() ->
      I = get_instanceid(),
      io:format("~s register elb=~s InstanceId=~s ~n", [ts(), yaml_get("AWS_ELB",?AWS_ELB), I]),
      erlcloud_elb:configure(yaml_get("ACCESS_KEY",?ACCESS_KEY), yaml_get("SECRECT_ACCESS_KEY",?SECRET_ACCESS_KEY)),
      R = erlcloud_elb:register_instance(yaml_get("AWS_ELB",?AWS_ELB),I),
      io:format("~s register reply=~p ~n", [ts(), R]).
  
  deregister_with_elb() ->
      I = get_instanceid(),
      io:format("~s deregister elb=~s InstanceId=~s ~n", [ts(), yaml_get("AWS_ELB",?AWS_ELB), I]),
      erlcloud_elb:configure(yaml_get("ACCESS_KEY",?ACCESS_KEY), yaml_get("SECRECT_ACCESS_KEY",?SECRET_ACCESS_KEY)),
      R = erlcloud_elb:deregister_instance(yaml_get("AWS_ELB",?AWS_ELB),I),
      io:format("~s deregister reply=~p ~n", [ts(), R]).
  
  
negative.code:     end.
  
  multipart_upload(Key, IoDevice, Config, Count) ->
      erlcloud_s3:configure(yaml_get("ACCESS_KEY",?ACCESS_KEY), yaml_get("SECRET_ACCESS_KEY",?SECRET_ACCESS_KEY)),
      {_,[{_,UploadId}]} = erlcloud_s3:start_multipart(yaml_get("S3_BUCKET",?S3_BUCKET), Key),
      io:format("~s S3 UploadId=~p ~n", [ts(), UploadId]),
      upload_parts(Key, IoDevice, UploadId, Config, 1, Count, []).
  