From b4ebb7fc9717b3159e2056dfb722f08d4f883c77 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Wed, 11 Jul 2018 22:26:44 +0000
Subject: [PATCH] industrialstuff: More details in package description.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6559 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 .../industrialstuff/Example/A3nalogGaugeSample/demo.lpi   | 1 +
 components/industrialstuff/industrial.lpk                 | 8 +++++++-
 components/industrialstuff/source/a3naloggauge.pas        | 5 ++---
 3 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/components/industrialstuff/Example/A3nalogGaugeSample/demo.lpi b/components/industrialstuff/Example/A3nalogGaugeSample/demo.lpi
index 6d9767498..14cdb4514 100644
--- a/components/industrialstuff/Example/A3nalogGaugeSample/demo.lpi
+++ b/components/industrialstuff/Example/A3nalogGaugeSample/demo.lpi
@@ -44,6 +44,7 @@
       <Unit2>
         <Filename Value="..\..\source\a3naloggauge.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="A3nalogGauge"/>
       </Unit2>
     </Units>
   </ProjectOptions>
diff --git a/components/industrialstuff/industrial.lpk b/components/industrialstuff/industrial.lpk
index c814084ac..77f5b1f05 100644
--- a/components/industrialstuff/industrial.lpk
+++ b/components/industrialstuff/industrial.lpk
@@ -25,7 +25,13 @@
         </Debugging>
       </Linking>
     </CompilerOptions>
-    <Description Value="Industrial-themed (IPV/PCV) components and gauges (e.g. LEDs)."/>
+    <Description Value="Industrial-themed components and gauges:
+- LED indicators
+- LED seven-sigment display
+- stop-light lamps
+- analog gauges
+- thermometer-like gauge
+- ampl"/>
     <License Value="MPL  + GPL "/>
     <Version Minor="2"/>
     <Files Count="11">
diff --git a/components/industrialstuff/source/a3naloggauge.pas b/components/industrialstuff/source/a3naloggauge.pas
index 13384969f..03cddd172 100644
--- a/components/industrialstuff/source/a3naloggauge.pas
+++ b/components/industrialstuff/source/a3naloggauge.pas
@@ -717,9 +717,8 @@ begin
   end;
 end;
 
-(*
 // This code is faster than the version above, but crashes after a few seconds.
-
+  {
 procedure TA3nalogGauge.FastAntiAliasPicture;
 const
   MaxPixelCount = MaxInt div SizeOf(TRGBTriple);
@@ -800,7 +799,7 @@ begin
     intfImgFace.Free;
   end;
 end;
-  *)
+}
 {$ELSE}
 const
   MaxPixelCount = MaxInt div SizeOf(TRGBTriple);