Subversion Repositories currency_converter

Rev

Rev 19 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 19 Rev 22
Line 546... Line 546...
546
    until not doRetry;
546
    until not doRetry;
547
    {$ENDREGION}
547
    {$ENDREGION}
548
  end;
548
  end;
549
 
549
 
550
  result := sJSON;
550
  result := sJSON;
-
 
551
 
-
 
552
  // "USDUSD" missing 06 Aug 2022. A bug?? Reported https://github.com/apilayer/currencylayer-API/issues/16
-
 
553
  if Pos('"USDUSD"', result) = 0 then
-
 
554
    result := StringReplace(result, '"quotes":{', '"quotes":{"USDUSD":1.00,', []);
551
end;
555
end;
552
 
556
 
553
end.
557
end.