From 4fa697e0ea328ccdc4d89bfbcb5da0684d2b1d3f Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 3 Sep 2021 08:02:24 +0000
Subject: [PATCH] mbColorLib: Fix typo in HSLRingPicker.GetBlue
 (https://forum.lazarus.freepascal.org/index.php/topic,56117.msg417090.html#msg417090).

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8083 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/mbColorLib/HSLRingPicker.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/mbColorLib/HSLRingPicker.pas b/components/mbColorLib/HSLRingPicker.pas
index 935e51e02..1699eefaf 100644
--- a/components/mbColorLib/HSLRingPicker.pas
+++ b/components/mbColorLib/HSLRingPicker.pas
@@ -173,7 +173,7 @@ end;
 
 function THSLRingPicker.GetBlue: Integer;
 begin
-  Result := GetRValue(FSelectedColor);
+  Result := GetBValue(FSelectedColor);
 end;
 
 function THSLRingPicker.GetBrightnessMode: TBrightnessMode;