paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 12:58:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Dotted filenames for package gitlab

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-03-06 14:58:03 +01:00
parent 484c453409
commit 43812138ca
3 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/gitlab/namespaced/Api.Gitlab.Client.pas Normal file
View File

@ -0,0 +1,3 @@
unit Api.Gitlab.Client;
{$DEFINE FPC_DOTTEDUNITS}
{$i gitlabclient.pas}

3
packages/gitlab/namespaces.lst Normal file
View File

@ -0,0 +1,3 @@
src/gitlabclient.pas=namespaced/Api.Gitlab.Client.pas
{s*:src/}=namespaced/
{i+:src/}

7
packages/gitlab/src/gitlabclient.pas
View File

@ -1,12 +1,19 @@
{$IFNDEF FPC_DOTTEDUNITS}
unit gitlabclient; unit gitlabclient;
{$ENDIF FPC_DOTTEDUNITS}
{$mode ObjFPC}{$H+} {$mode ObjFPC}{$H+}
{$modeswitch advancedrecords} {$modeswitch advancedrecords}
interface interface
{$IFDEF FPC_DOTTEDUNITS}
uses
System.Classes, System.SysUtils, System.IniFiles, FpJson.Data, FpWeb.Client, FpWeb.Client.Http, FpWeb.Http.Protocol;
{$ELSE FPC_DOTTEDUNITS}
uses uses
Classes, SysUtils, inifiles, fpjson, fpwebclient, fphttpwebclient, httpprotocol; Classes, SysUtils, inifiles, fpjson, fpwebclient, fphttpwebclient, httpprotocol;
{$ENDIF FPC_DOTTEDUNITS}
Const Const
LongThrottleSleep = 60 * 1000; // One minute LongThrottleSleep = 60 * 1000; // One minute