diff --git a/components/tvplanit/source/vpjsonds.pas b/components/tvplanit/source/vpjsonds.pas index 67d00cb7d..ec02c58d8 100644 --- a/components/tvplanit/source/vpjsonds.pas +++ b/components/tvplanit/source/vpjsonds.pas @@ -756,9 +756,7 @@ var cont: TVpContact; task: TvpTask; i, j: Integer; - {$IF FPC_FullVersion < 30000} s: TJSONStringType; - {$ENDIF} begin if AStream = nil then raise Exception.Create('No stream specified'); @@ -819,13 +817,8 @@ begin end; end; - {$IF FPC_FULLVERSION < 030000} s := json.FormatJSON; AStream.Write(s[1], Length(s)); - {$ELSE} - json.DumpJSON(AStream); - {$ENDIF} - finally json.Free; end;