Changeset 312

Timestamp:

Jul 31, 2008, 8:49:29 PM (17 years ago)

Author:

RBRi

Message:

small fix

File:

• branches/2.19_branch/NewView/SearchUnit.pas (modified) (2 diffs)

branches/2.19_branch/NewView/SearchUnit.pas

@@ -168 +168 @@
   begin
     DictWord := HelpFile.DictionaryWords[ DictIndex ];
-    if StrStartsWithIgnoringCase( SearchWord, DictWord ) then
+    if StrStartsWithIgnoringCase(DictWord, SearchWord) then
       Results[ DictIndex ] := MatchedWordRelevance( SearchWord, DictWord );
   end;
@@ -187 +187 @@
   begin
     DictWord := HelpFile.DictionaryWords[ DictIndex ];
-    if StrEndsWithIgnoringCase( SearchWord, DictWord ) then
+    if StrEndsWithIgnoringCase(DictWord, SearchWord ) then
       Results[ DictIndex ] := MatchedWordRelevance( SearchWord, DictWord );
   end;