Skip to content

Commit

Permalink
Some code formatting
Browse files Browse the repository at this point in the history
  • Loading branch information
Pozitronik authored and Pozitronik committed May 22, 2019
1 parent a272057 commit 91785a3
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions CMLHTTP.pas
Original file line number Diff line number Diff line change
Expand Up @@ -23,8 +23,8 @@ TCloudMailRuHTTP = class
{PROCEDURES}
procedure Log(LogLevel, MsgType: integer; LogString: WideString);
procedure setCookie(const Value: TIdCookieManager);
procedure SetExternalSourceName(const Value: WideString);
procedure SetExternalTargetName(const Value: WideString);
procedure SetExternalSourceName(const Value: WideString);
procedure SetExternalTargetName(const Value: WideString);

public
{PROPERTIES}
Expand Down Expand Up @@ -313,12 +313,12 @@ procedure TCloudMailRuHTTP.setCookie(const Value: TIdCookieManager);

procedure TCloudMailRuHTTP.SetExternalSourceName(const Value: WideString);
begin
self.ExternalSourceName := PWideChar(Value);
self.ExternalSourceName := PWideChar(Value);
end;

procedure TCloudMailRuHTTP.SetExternalTargetName(const Value: WideString);
begin
Self.ExternalTargetName := PWideChar(Value);
self.ExternalTargetName := PWideChar(Value);
end;

procedure TCloudMailRuHTTP.SetProgressNames(SourceName, TargetName: WideString);
Expand Down

0 comments on commit 91785a3

Please sign in to comment.