paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-28 11:31:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Merging revisions 45252 from trunk:

Browse Source 
------------------------------------------------------------------------
    r45252 | michael | 2020-05-04 11:54:39 +0200 (Mon, 04 May 2020) | 1 line
    
    * Better uses clause for Delphi, less warnings
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@45253 -
This commit is contained in:
michael 2020-05-04 09:55:12 +00:00
parent aee16aab75
commit 529ab21bbb
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/fcl-json/src/fpjsontopas.pp
View File

@ -397,7 +397,8 @@ begin
if (S<>'') and (S[1]<>',') then
S:=', '+S;
if jpoDelphiJSON in Options then
S:='JSON'+S
// Collections to avoid warnings about unexpanded inlines
S:='System.Generics.Collections, JSON'+S
else
S:='fpJSON'+S;
S:='SysUtils, Classes, '+S;