paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-28 18:56:04 +02:00
Code Issues Packages Projects Releases Wiki Activity

Jedi Code Format: Add more files to the IdePlugin package. Cleanup in uses sections.

Browse Source
This commit is contained in:
Juha 2022-10-04 10:15:42 +03:00
parent 0e08315669
commit 4fda5f9771
5 changed files with 19 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
components/jcf2/IdePlugin/lazarus/jcfidelazarus.lpk
View File

@ -722,6 +722,18 @@
<Filename Value="..\..\ReadWrite\diffmerge.pas"/> <Filename Value="..\..\ReadWrite\diffmerge.pas"/>
<UnitName Value="diffmerge"/> <UnitName Value="diffmerge"/>
</Item> </Item>
<Item>
<Filename Value="..\..\Utils\JcfStringUtils.pas"/>
<UnitName Value="JcfStringUtils"/>
</Item>
<Item>
<Filename Value="..\..\Utils\JcfSystemUtils.pas"/>
<UnitName Value="JcfSystemUtils"/>
</Item>
<Item>
<Filename Value="..\..\Utils\JcfUnicodeFiles.pas"/>
<UnitName Value="JcfUnicodeFiles"/>
</Item>
</Files> </Files>
<i18n> <i18n>
<EnableI18N Value="True"/> <EnableI18N Value="True"/>

3
components/jcf2/IdePlugin/lazarus/jcfidelazarus.pas
View File

@ -41,7 +41,8 @@ uses
frClarifyCaseBlocks, frComments, frWarnings, frReservedCapsSettings, frClarifyCaseBlocks, frComments, frWarnings, frReservedCapsSettings,
frAnyCapsSettings, frIdentifierCapsSettings, frNotIdentifierCapsSettings, frAnyCapsSettings, frIdentifierCapsSettings, frNotIdentifierCapsSettings,
frUnitCaps, frReplace, frUses, frTransform, frAsm, frPreProcessor, frUnitCaps, frReplace, frUses, frTransform, frAsm, frPreProcessor,
JcfUIConsts, Diff, diffmerge, LazarusPackageIntf; JcfUIConsts, Diff, diffmerge, JcfStringUtils, JcfSystemUtils,
JcfUnicodeFiles, LazarusPackageIntf;
implementation implementation

6
components/jcf2/Utils/Delay.pas
View File

@ -56,7 +56,9 @@ See http://www.gnu.org/licenses/gpl.html
interface interface
uses ExtCtrls; uses
SysUtils,
ExtCtrls;
type type
TProcedure = procedure(var pbTryAgain: boolean); TProcedure = procedure(var pbTryAgain: boolean);
@ -94,8 +96,6 @@ type
implementation implementation
uses SysUtils;
const const
// default of 100ms = 1/0 second // default of 100ms = 1/0 second
DEFAULT_DELAY = 100; DEFAULT_DELAY = 100;

2
components/jcf2/Utils/JcfSystemUtils.pas
View File

@ -59,7 +59,7 @@ implementation
uses uses
{$ifdef MSWINDOWS} {$ifdef MSWINDOWS}
Windows, ShellApi, {$PUSH} {$WARNINGS OFF} FileCtrl {$POP} Windows, ShellApi
{$endif} {$endif}
{$ifdef Unix} {$ifdef Unix}
Unix Unix

2
components/jcf2/Utils/JcfUnicodeFiles.pas
View File

@ -30,7 +30,7 @@ See http://www.gnu.org/licenses/gpl.html
interface interface
uses uses
Classes, SysUtils, Dialogs; Classes, SysUtils;
type type
TFileContentType = (eUnknown, e8Bit, eUtf8, TFileContentType = (eUnknown, e8Bit, eUtf8,