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

fix, DCD completion half broken due to a typo

This commit is contained in:
Basile Burg 2014-12-04 00:48:48 +01:00
parent 76dd9b8d44
commit ea21bc207d
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/ce_editor.pas
View File

@ -266,6 +266,7 @@ begin
str.SaveToFile(ftempname); str.SaveToFile(ftempname);
fname := ftempname; fname := ftempname;
srcpos := fDoc.SelStart; srcpos := fDoc.SelStart;
if srcpos > 0 then srcpos += -1;
if fDoc.GetWordAtRowCol(fDoc.LogicalCaretXY) <> '' then if fDoc.GetWordAtRowCol(fDoc.LogicalCaretXY) <> '' then
ce_dcd.getSymbolLoc(fname, srcpos); ce_dcd.getSymbolLoc(fname, srcpos);
if fname <> ftempname then if fileExists(fname) then if fname <> ftempname then if fileExists(fname) then
@ -293,7 +294,7 @@ begin
fDoc.Lines.SaveToStream(str); fDoc.Lines.SaveToStream(str);
str.SaveToFile(fname); str.SaveToFile(fname);
srcpos := fDoc.SelStart; srcpos := fDoc.SelStart;
if srcpos > 0 then srcpos -= -1; if srcpos > 0 then srcpos += -1;
completion.ItemList.Clear; completion.ItemList.Clear;
ce_dcd.getCompletion(fname, srcpos, completion.ItemList); ce_dcd.getCompletion(fname, srcpos, completion.ItemList);
finally finally
@ -319,6 +320,7 @@ begin
fDoc.Lines.SaveToStream(str); fDoc.Lines.SaveToStream(str);
str.SaveToFile(fname); str.SaveToFile(fname);
srcpos := fDoc.SelStart; srcpos := fDoc.SelStart;
if srcpos > 0 then srcpos += -1;
if fDoc.GetWordAtRowCol(fDoc.LogicalCaretXY) <> '' then if fDoc.GetWordAtRowCol(fDoc.LogicalCaretXY) <> '' then
ce_dcd.getHint(fname, srcpos, lst); ce_dcd.getHint(fname, srcpos, lst);
result := lst.Text; result := lst.Text;