components: less hints

git-svn-id: trunk@51788 -

components/IdeInspector/ideinspector.pas

@@ -2,8 +2,9 @@
   This source is only used to compile and install the package.
  }
 
-unit IdeInspector; 
+unit IdeInspector;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -11,11 +12,11 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('MainInspector', @MainInspector.Register); 
+  RegisterUnit('MainInspector', @MainInspector.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('IdeInspector', @Register); 
+  RegisterPackage('IdeInspector', @Register);
 end.

components/IdeLazLogger/idelazlogger.pas

@@ -4,6 +4,7 @@
 
 unit IdeLazLogger;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/IndustrialStuff/industrial.pas

@@ -4,6 +4,7 @@
 
 unit industrial;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/PascalScript/Source/pascalscript.pas

@@ -4,15 +4,18 @@
 
 unit pascalscript;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  uPSRuntime, uPSR_stdctrls, PascalScript_Core_Reg, uPSC_buttons, uPSC_classes, 
+  uPSRuntime, uPSR_stdctrls, PascalScript_Core_Reg, uPSC_buttons, 
-  uPSC_controls, uPSC_dateutils, uPSC_DB, uPSC_dll, uPSC_extctrls, uPSC_forms, uPSC_graphics, 
+  uPSC_classes, uPSC_controls, uPSC_dateutils, uPSC_DB, uPSC_dll, 
-  uPSC_menus, uPSC_std, uPSC_stdctrls, uPSCompiler, uPSComponent, uPSComponent_Controls, 
+  uPSC_extctrls, uPSC_forms, uPSC_graphics, uPSC_menus, uPSC_std, 
-  uPSComponent_DB, uPSComponent_Default, uPSComponent_Forms, uPSComponent_StdCtrls, uPSUtils, 
+  uPSC_stdctrls, uPSCompiler, uPSComponent, uPSComponent_Controls, 
-  uPSDebugger, uPSDisassembly, uPSPreProcessor, uPSR_buttons, uPSR_classes, uPSR_controls, 
+  uPSComponent_DB, uPSComponent_Default, uPSComponent_Forms, 
-  uPSR_dateutils, uPSR_DB, uPSR_dll, uPSR_extctrls, uPSR_forms, uPSR_graphics, uPSR_menus, 
+  uPSComponent_StdCtrls, uPSUtils, uPSDebugger, uPSDisassembly, 
+  uPSPreProcessor, uPSR_buttons, uPSR_classes, uPSR_controls, uPSR_dateutils, 
+  uPSR_DB, uPSR_dll, uPSR_extctrls, uPSR_forms, uPSR_graphics, uPSR_menus, 
   uPSR_std, uPSC_comobj, uPSComponent_COM, uPSR_comobj, LazarusPackageIntf;
 
 implementation

components/aarre/src/aarrebase.pas

@@ -4,6 +4,7 @@
 
 unit aarrebase;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/activex/LazActiveX.pas

@@ -4,6 +4,7 @@
 
 unit LazActiveX;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/aggpas/lazarus/aggpaslcl.pas

@@ -4,6 +4,7 @@
 
 unit AggPasLCL;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/anchordocking/anchordockpkg.pas

@@ -4,6 +4,7 @@
 
 unit anchordockpkg;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/anchordocking/design/anchordockingdsgn.pas

@@ -4,6 +4,7 @@
 
 unit AnchorDockingDsgn;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/cairocanvas/cairocanvas_pkg.pas

@@ -4,6 +4,7 @@
 
 unit cairocanvas_pkg;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/chmhelp/packages/help/lhelpcontrolpkg.pas

@@ -4,6 +4,7 @@
 
 unit lhelpcontrolpkg;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -19,3 +20,4 @@ end;
 initialization
   RegisterPackage('lhelpcontrolpkg', @Register);
 end.
+

components/chmhelp/packages/idehelp/chmhelppkg.pas

@@ -4,6 +4,7 @@
 
 unit ChmHelpPkg;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/codetools/codetools.pas

@@ -4,6 +4,7 @@
 
 unit CodeTools;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/codetools/ide/cody.pas

@@ -4,6 +4,7 @@
 
 unit Cody;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/compilers/c/lazc.pas

@@ -1,9 +1,10 @@
-{ This file was automatically created by Lazarus. do not edit!
+{ This file was automatically created by Lazarus. Do not edit!
   This source is only used to compile and install the package.
  }
 
-unit lazc; 
+unit LazC;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -11,11 +12,11 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('LazCUtil', @LazCUtil.Register); 
+  RegisterUnit('LazCUtil', @LazCUtil.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('LazC', @Register); 
+  RegisterPackage('LazC', @Register);
 end.

components/customdrawn/customdrawn.pas

@@ -4,6 +4,7 @@
 
 unit customdrawn;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/customform/demo/appforms.pas

@@ -1,20 +1,21 @@
 { This file was automatically created by Lazarus. Do not edit!
-This source is only used to compile and install the package.
+  This source is only used to compile and install the package.
  }
 
-unit appforms; 
+unit appforms;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  AppForm, dbappform, regappforms, LazarusPackageIntf; 
+  AppForm, dbappform, regappforms, LazarusPackageIntf;
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-end; 
+end;
 
 initialization
-  RegisterPackage('appforms', @Register); 
+  RegisterPackage('appforms', @Register);
 end.

components/customform/lazcustforms.pas

@@ -1,21 +1,22 @@
 { This file was automatically created by Lazarus. Do not edit!
-This source is only used to compile and install the package.
+  This source is only used to compile and install the package.
  }
 
-unit LazCustForms; 
+unit LazCustForms;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  custforms, LazarusPackageIntf; 
+  custforms, LazarusPackageIntf;
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('custforms', @custforms.Register); 
+  RegisterUnit('custforms', @custforms.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('LazCustForms', @Register); 
+  RegisterPackage('LazCustForms', @Register);
 end.

components/daemon/lazdaemon.pas

@@ -1,21 +1,22 @@
 { This file was automatically created by Lazarus. Do not edit!
-This source is only used to compile and install the package.
+  This source is only used to compile and install the package.
  }
 
-unit lazdaemon; 
+unit lazdaemon;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  RegLazDaemon, daemonapp, lazdaemonapp, LazarusPackageIntf; 
+  RegLazDaemon, daemonapp, lazdaemonapp, LazarusPackageIntf;
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('RegLazDaemon', @RegLazDaemon.Register); 
+  RegisterUnit('RegLazDaemon', @RegLazDaemon.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('lazdaemon', @Register); 
+  RegisterPackage('lazdaemon', @Register);
 end.

components/datadict/lazdatadict.pas

@@ -1,23 +1,24 @@
-{ Este arquivo foi automaticamente criado pelo Lazarus. Não edite!
+{ This file was automatically created by Lazarus. Do not edit!
-  Este fonte é usado apenas para compilar e instalar o pacote.
+  This source is only used to compile and install the package.
  }
 
-unit lazdatadict; 
+unit lazdatadict;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-    frmconfprojdatadict, idedatadict, reglazdatadict, frmconfdatadict, 
+  frmconfprojdatadict, idedatadict, reglazdatadict, frmconfdatadict, 
   frmSelectCodeGenerator, fpcodegenerator, frmBaseConfigCodeGenerator, 
   frmgeneratedcode, ldd_consts, LazarusPackageIntf;
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('reglazdatadict', @reglazdatadict.Register); 
+  RegisterUnit('reglazdatadict', @reglazdatadict.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('lazdatadict', @Register); 
+  RegisterPackage('lazdatadict', @Register);
 end.

components/datetimectrls/datetimectrls.pas

@@ -4,6 +4,7 @@
 
 unit DateTimeCtrls;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/dbexport/lazdbexport.pas

@@ -1,22 +1,23 @@
-{ Este arquivo foi automaticamente criado pelo Lazarus. Não edite!
+{ This file was automatically created by Lazarus. Do not edit!
-  Este fonte é usado apenas para compilar e instalar o pacote.
+  This source is only used to compile and install the package.
  }
 
-unit lazdbexport; 
+unit lazdbexport;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-    regdbexport, fpdataexporter, frmSelectExportFormat, frmexportprogress, 
+  regdbexport, fpdataexporter, frmSelectExportFormat, frmexportprogress, 
   frmBaseConfigExport, sdb_consts, LazarusPackageIntf;
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('regdbexport', @regdbexport.Register); 
+  RegisterUnit('regdbexport', @regdbexport.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('lazdbexport', @Register); 
+  RegisterPackage('lazdbexport', @Register);
 end.

components/debuggerintf/debuggerintf.pas

@@ -4,6 +4,7 @@
 
 unit DebuggerIntf;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/education/educationlaz.pas

@@ -2,8 +2,9 @@
   This source is only used to compile and install the package.
  }
 
-unit EducationLaz; 
+unit EducationLaz;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -13,19 +14,19 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('EduEnvOptsFrame', @EduEnvOptsFrame.Register); 
+  RegisterUnit('EduEnvOptsFrame', @EduEnvOptsFrame.Register);
-  RegisterUnit('EduPkgSystem', @EduPkgSystem.Register); 
+  RegisterUnit('EduPkgSystem', @EduPkgSystem.Register);
-  RegisterUnit('EduCompPalette', @EduCompPalette.Register); 
+  RegisterUnit('EduCompPalette', @EduCompPalette.Register);
-  RegisterUnit('EduMenu', @EduMenu.Register); 
+  RegisterUnit('EduMenu', @EduMenu.Register);
-  RegisterUnit('EduNewProgram', @EduNewProgram.Register); 
+  RegisterUnit('EduNewProgram', @EduNewProgram.Register);
-  RegisterUnit('EduPropsEvents', @EduPropsEvents.Register); 
+  RegisterUnit('EduPropsEvents', @EduPropsEvents.Register);
-  RegisterUnit('EduOIPages', @EduOIPages.Register); 
+  RegisterUnit('EduOIPages', @EduOIPages.Register);
-  RegisterUnit('EduOptionsDlg', @EduOptionsDlg.Register); 
+  RegisterUnit('EduOptionsDlg', @EduOptionsDlg.Register);
-  RegisterUnit('EduSpeedButtons', @EduSpeedButtons.Register); 
+  RegisterUnit('EduSpeedButtons', @EduSpeedButtons.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('EducationLaz', @Register); 
+  RegisterPackage('EducationLaz', @Register);
 end.

components/externhelp/externhelp.pas

@@ -2,8 +2,9 @@
   This source is only used to compile and install the package.
  }
 
-unit ExternHelp; 
+unit ExternHelp;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -11,11 +12,11 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('ExternHelpFrm', @ExternHelpFrm.Register); 
+  RegisterUnit('ExternHelpFrm', @ExternHelpFrm.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('ExternHelp', @Register); 
+  RegisterPackage('ExternHelp', @Register);
 end.

components/favorites/favorites.pas

@@ -4,6 +4,7 @@
 
 unit favorites;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/filebrowser/idefilebrowser.pas

@@ -4,6 +4,7 @@
 
 unit idefilebrowser;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/fpcunit/console/fpcunitconsolerunner.pas

@@ -1,13 +1,14 @@
 { This file was automatically created by Lazarus. Do not edit!
-This source is only used to compile and install the package.
+  This source is only used to compile and install the package.
  }
 
-unit fpcunitconsolerunner; 
+unit fpcunitconsolerunner;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  consoletestrunner; 
+  consoletestrunner;
 
 implementation
 

components/fpcunit/fpcunittestrunner.pas

@@ -2,12 +2,13 @@
   This source is only used to compile and install the package.
  }
 
-unit FPCUnitTestRunner; 
+unit FPCUnitTestRunner;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-    GuiTestRunner;
+  GuiTestRunner;
 
 implementation
 

components/fpcunit/ide/fpcunitide.pas

@@ -1,9 +1,10 @@
-{ Este arquivo foi automaticamente criado pelo Lazarus. Não edite!
+{ This file was automatically created by Lazarus. Do not edit!
-  Este fonte é usado apenas para compilar e instalar o pacote.
+  This source is only used to compile and install the package.
  }
 
-unit fpcunitide; 
+unit fpcunitide;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -11,11 +12,11 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('FPCUnitLazIDEIntf', @FPCUnitLazIDEIntf.Register); 
+  RegisterUnit('FPCUnitLazIDEIntf', @FPCUnitLazIDEIntf.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('fpcunitide', @Register); 
+  RegisterPackage('fpcunitide', @Register);
 end.

components/fpdebug/fpdebug.pas

@@ -4,6 +4,7 @@
 
 unit fpdebug;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/fppkg/src/lazaruspackagemanager.pas

@@ -2,8 +2,9 @@
   This source is only used to compile and install the package.
  }
 
-unit LazarusPackageManager; 
+unit LazarusPackageManager;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -13,11 +14,11 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('LazPackageManagerIntf', @LazPackageManagerIntf.Register); 
+  RegisterUnit('LazPackageManagerIntf', @LazPackageManagerIntf.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('LazarusPackageManager', @Register); 
+  RegisterPackage('LazarusPackageManager', @Register);
 end.

components/fppkg/svn/svnpkg.pas

@@ -1,13 +1,14 @@
 { This file was automatically created by Lazarus. Do not edit!
-This source is only used to compile and install the package.
+  This source is only used to compile and install the package.
  }
 
-unit svnpkg; 
+unit svnpkg;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  SvnClasses, SvnCommand; 
+  SvnClasses, SvnCommand;
 
 implementation
 

components/fpvectorial/fpvectorialpkg.pas

@@ -4,6 +4,7 @@
 
 unit fpvectorialpkg;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/fpweb/weblaz.pas

@@ -4,6 +4,7 @@
 
 unit weblaz;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -29,3 +30,4 @@ end;
 initialization
   RegisterPackage('weblaz', @Register);
 end.
+

components/googleapis/lazgoogleapis.pas

@@ -4,6 +4,7 @@
 
 unit lazgoogleapis;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/h2pas/h2paswizard.pas

@@ -2,21 +2,22 @@
   This source is only used to compile and install the package.
  }
 
-unit H2PasWizard; 
+unit H2PasWizard;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-    H2PasConvert, H2PasDlg, H2PasStrConsts, IDETextConvListEdit, 
+  H2PasConvert, H2PasDlg, H2PasStrConsts, IDETextConvListEdit, 
   IDETextConvListAdd, LazarusPackageIntf;
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('H2PasDlg', @H2PasDlg.Register); 
+  RegisterUnit('H2PasDlg', @H2PasDlg.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('H2PasWizard', @Register); 
+  RegisterPackage('H2PasWizard', @Register);
 end.

components/ideintf/ideintf.pas

@@ -4,6 +4,7 @@
 
 unit IDEIntf;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/images/imagesforlazarus.pas

@@ -2,8 +2,9 @@
   This source is only used to compile and install the package.
  }
 
-unit ImagesForLazarus; 
+unit ImagesForLazarus;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
@@ -11,11 +12,11 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('LazTGA', @LazTGA.Register); 
+  RegisterUnit('LazTGA', @LazTGA.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('ImagesForLazarus', @Register); 
+  RegisterPackage('ImagesForLazarus', @Register);
 end.

components/instantfpc/instantfpclaz.pas

@@ -4,6 +4,7 @@
 
 unit InstantFPCLaz;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/jcf2/IdePlugin/lazarus/jcfidelazarus.pas

@@ -1,15 +1,14 @@
-{ Этот файл был автоматически создан Lazarus. Н<EFBFBD>
+{ This file was automatically created by Lazarus. Do not edit!
-  <EFBFBD> редактировать!
+  This source is only used to compile and install the package.
-  Исходный код используется только для комп<EFBFBD>
-    <EFBFBD>ляции и установки пакета.
  }
 
-unit jcfidelazarus; 
+unit jcfidelazarus;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-    JcfIdeMain, JcfIdeRegister, AsmKeywords, BuildParseTree, BuildTokenList, 
+  JcfIdeMain, JcfIdeRegister, AsmKeywords, BuildParseTree, BuildTokenList, 
   ParseError, ParseTreeNode, ParseTreeNodeType, PreProcessorExpressionParser, 
   PreProcessorExpressionTokenise, PreProcessorExpressionTokens, 
   PreProcessorParseTree, SourceToken, SourceTokenList, Tokens, TokenUtils, 
@@ -46,11 +45,11 @@ uses
 
 implementation
 
-procedure Register; 
+procedure Register;
 begin
-  RegisterUnit('JcfIdeRegister', @JcfIdeRegister.Register); 
+  RegisterUnit('JcfIdeRegister', @JcfIdeRegister.Register);
-end; 
+end;
 
 initialization
-  RegisterPackage('jcfidelazarus', @Register); 
+  RegisterPackage('jcfidelazarus', @Register);
 end.

components/lazcontrols/design/lazcontroldsgn.pas

@@ -4,6 +4,7 @@
 
 unit LazControlDsgn;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/lazcontrols/lazcontrols.pas

@@ -4,6 +4,7 @@
 
 unit LazControls;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses

components/lazdebuggergdbmi/lazdebuggergdbmi.pas

@@ -4,12 +4,13 @@
 
 unit LazDebuggerGdbmi;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  CmdLineDebugger, DebugUtils, GDBTypeInfo, GDBMIMiscClasses, IDEMiniLibC, GDBMIDebugger, 
+  CmdLineDebugger, DebugUtils, GDBTypeInfo, GDBMIMiscClasses, IDEMiniLibC, 
-  GDBMIDebugInstructions, GDBMIServerDebugger, SSHGDBMIDebugger, GdbmiStringConstants, 
+  GDBMIDebugger, GDBMIDebugInstructions, GDBMIServerDebugger, 
-  LazarusPackageIntf;
+  SSHGDBMIDebugger, GdbmiStringConstants, LazarusPackageIntf;
 
 implementation