From 79021409d05c24da797f73299744e588effd381c Mon Sep 17 00:00:00 2001
From: Merlijn Wajer <merlijn@wizzup.org>
Date: Wed, 6 Jul 2011 21:34:03 +0200
Subject: [PATCH] Finder: CTS 2 fix.

---
 Units/MMLCore/finder.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Units/MMLCore/finder.pas b/Units/MMLCore/finder.pas
index b9473e7..de989b9 100644
--- a/Units/MMLCore/finder.pas
+++ b/Units/MMLCore/finder.pas
@@ -449,6 +449,7 @@ begin
                       PCTS2Info(Result)^.L);
           PCTS2Info(Result)^.hueMod := Tol * hueMod;
           PCTS2Info(Result)^.satMod := Tol * satMod;
+          PCTS2Info(Result)^.Tol := Tol;
       end;
   end;
 end;