paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-11 11:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

Synedit: Undone default-filter deprecation

Browse Source 
git-svn-id: trunk@22619 -
This commit is contained in:
martin 2009-11-16 12:09:03 +00:00
parent 2f36654d16
commit 330f5e60fb
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/synedit/synedithighlighter.pp
View File

@ -326,7 +326,7 @@ type
property DividerDrawConfigCount: Integer read GetDividerDrawConfigCount; property DividerDrawConfigCount: Integer read GetDividerDrawConfigCount;
published published
property DefaultFilter: string read GetDefaultFilter write SetDefaultFilter property DefaultFilter: string read GetDefaultFilter write SetDefaultFilter
stored IsFilterStored; deprecated; stored IsFilterStored;
property Enabled: boolean read fEnabled write SetEnabled default TRUE; //DDH 2001-10-23 property Enabled: boolean read fEnabled write SetEnabled default TRUE; //DDH 2001-10-23
end; end;
@ -947,7 +947,7 @@ begin
if Src is ClassType then if Src is ClassType then
SampleSource := Src.SampleSource; SampleSource := Src.SampleSource;
fWordBreakChars := Src.WordBreakChars; fWordBreakChars := Src.WordBreakChars;
//DefaultFilter := Src.DefaultFilter; DefaultFilter := Src.DefaultFilter;
Enabled := Src.Enabled; Enabled := Src.Enabled;
end else end else
inherited Assign(Source); inherited Assign(Source);