From d2aed41e7359000730cb1659cd7341497589e594 Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Wed, 16 Mar 2016 22:32:39 +0000 Subject: [PATCH] colorpalette: Update package unit (no warning about unused units) git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4563 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/colorpalette/lazcolorpalette.pas | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/components/colorpalette/lazcolorpalette.pas b/components/colorpalette/lazcolorpalette.pas index bec185fdc..501a70953 100644 --- a/components/colorpalette/lazcolorpalette.pas +++ b/components/colorpalette/lazcolorpalette.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 LazColorPalette; +unit LazColorPalette; +{$warn 5023 off : no warning about unused units} interface uses - ColorPalette, LazarusPackageIntf; + ColorPalette, LazarusPackageIntf; implementation -procedure Register; +procedure Register; begin - RegisterUnit('ColorPalette', @ColorPalette.Register); -end; + RegisterUnit('ColorPalette', @ColorPalette.Register); +end; initialization - RegisterPackage('LazColorPalette', @Register); + RegisterPackage('LazColorPalette', @Register); end.