From d67d20840ba00767249b93617a3b7e8ab5d12ad1 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 19 Jan 2008 08:36:36 +0000
Subject: [PATCH] codetools: fixed FindNextComment bug #10650

git-svn-id: trunk@13791 -
---
 components/codetools/basiccodetools.pas | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/components/codetools/basiccodetools.pas b/components/codetools/basiccodetools.pas
index 6a5568e0a4..93cdfea440 100644
--- a/components/codetools/basiccodetools.pas
+++ b/components/codetools/basiccodetools.pas
@@ -1135,8 +1135,7 @@ begin
         exit;
 
     '{':
-      if (Result<MaxPos) and (ASource[Result+1]='$') then
-        exit;
+      exit;
 
     '(':
       if (Result<MaxPos) and (ASource[Result+1]='*') then