forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

rename bad func ident, this func is only called after NewLine 

and not to determine if caret is in ddoc
This commit is contained in:
Basile Burg 2018-08-03 21:18:40 +02:00
parent e0d651b99a
commit 77efdfedc0
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/ce_synmemo.pas
View File

@ -269,7 +269,7 @@ type
var SourceStart, SourceEnd: TPoint; KeyChar: TUTF8Char; Shift: TShiftState); var SourceStart, SourceEnd: TPoint; KeyChar: TUTF8Char; Shift: TShiftState);
procedure showCallTips(const tips: string); procedure showCallTips(const tips: string);
function lexCanCloseBrace: boolean; function lexCanCloseBrace: boolean;
function lexInDdoc: char; function canInsertLeadingDdocSymbol: char;
procedure handleStatusChanged(Sender: TObject; Changes: TSynStatusChanges); procedure handleStatusChanged(Sender: TObject; Changes: TSynStatusChanges);
procedure goToChangedArea(next: boolean); procedure goToChangedArea(next: boolean);
procedure goToProtectionGroup(next: boolean); procedure goToProtectionGroup(next: boolean);
@ -3001,7 +3001,7 @@ begin
end; end;
end; end;
function TCESynMemo.lexInDdoc: char; function TCESynMemo.canInsertLeadingDdocSymbol: char;
var var
i: integer; i: integer;
p: TPoint; p: TPoint;
@ -3416,7 +3416,7 @@ begin
fLexToks.Clear; fLexToks.Clear;
lex(lines.Text, fLexToks); lex(lines.Text, fLexToks);
end; end;
ddc := lexInDdoc; ddc := canInsertLeadingDdocSymbol;
if ddc in ['*', '+'] then if ddc in ['*', '+'] then
begin begin
inherited; inherited;