anchor.diff:    fssecret_key := GetEnvVariableValue(AWS_SECRET_ACCESS_KEY);
     fsregion := GetEnvVariableValue(AWS_REGION);
     fscredential_file := GetEnvVariableValue(AWS_CREDENTIAL_FILE);
  +  fsProfile := GetEnvVariableValue(AWS_PROFILE);
   end;
   
   function TAmazonEnvironment.getcredential_file: UTF8String;
  
positive.code:   AWS_ACCESS_KEY_ID = 'AWS_ACCESS_KEY_ID';
    AWS_SECRET_ACCESS_KEY = 'AWS_SECRET_ACCESS_KEY';
    AWS_CREDENTIAL_FILE = 'AWS_CREDENTIAL_FILE';
  
  type
    TAmazonEnvironment = class
      protected
        fsaprofile: UTF8String;
        fssecret_key: UTF8String;
        fsaccess_key: UTF8String;
        fsregion: UTF8String;
  
negative.code: 
  implementation
  
  function TAmazonEnvironment.GetEnvVariableValue(const aVariablename: string): string;
  var
    BufSize: Integer;
  begin
    Result := Trim(GetEnvironmentVariable(aVariablename));
  end;
  
  
  