fix(ft-s3): fix atom and variable naming
This commit is contained in:
parent
71965d90e4
commit
4fbabe5a76
|
@ -105,7 +105,7 @@ start_multipart(
|
|||
) ->
|
||||
case erlcloud_s3:start_multipart(Bucket, key(Key), Options, Headers, AwsConfig) of
|
||||
{ok, Props} ->
|
||||
{ok, proplists:get_value(uploadId, Props)};
|
||||
{ok, proplists:get_value('uploadId', Props)};
|
||||
{error, Reason} ->
|
||||
?SLOG(debug, #{msg => "start_multipart_fail", key => Key, reason => Reason}),
|
||||
{error, Reason}
|
||||
|
|
|
@ -96,11 +96,11 @@ set_outdated(ProfileId, PoolName, Timeout) ->
|
|||
outdated(ProfileId) ->
|
||||
Now = erlang:monotonic_time(millisecond),
|
||||
MS = ets:fun2ms(
|
||||
fun(#pool{key = {ProfileId_, PoolName}, deadline = Deadline_}) when
|
||||
ProfileId_ =:= ProfileId andalso
|
||||
Deadline_ =/= undefined andalso Deadline_ < Now
|
||||
fun(#pool{key = {CurProfileId, CurPoolName}, deadline = CurDeadline}) when
|
||||
CurProfileId =:= ProfileId andalso
|
||||
CurDeadline =/= undefined andalso CurDeadline < Now
|
||||
->
|
||||
PoolName
|
||||
CurPoolName
|
||||
end
|
||||
),
|
||||
ets:select(?TAB, MS).
|
||||
|
@ -109,8 +109,8 @@ outdated(ProfileId) ->
|
|||
[pool_name()].
|
||||
all(ProfileId) ->
|
||||
MS = ets:fun2ms(
|
||||
fun(#pool{key = {ProfileId_, PoolName}}) when ProfileId_ =:= ProfileId ->
|
||||
PoolName
|
||||
fun(#pool{key = {CurProfileId, CurPoolName}}) when CurProfileId =:= ProfileId ->
|
||||
CurPoolName
|
||||
end
|
||||
),
|
||||
ets:select(?TAB, MS).
|
||||
|
|
Loading…
Reference in New Issue