From 361e5728b8f6596f5019e66f90aa115e41495f73 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Wed, 4 May 2016 23:52:06 +0200
Subject: [PATCH] identifier renaming, reproduce DCD behavior at word edges

---
 src/ce_synmemo.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas
index e7b4693d..b7e9b37c 100644
--- a/src/ce_synmemo.pas
+++ b/src/ce_synmemo.pas
@@ -1015,12 +1015,15 @@ end;
 procedure TCESynMemo.renameIdentifier;
 var
   locs: TIntOpenArray = nil;
-  old, idt: string;
+  old, idt, line: string;
   i, j, loc: integer;
   c: char;
 begin
   if not DcdWrapper.available then
     exit;
+  line := lineText;
+  if (CaretX = 1) or not (line[LogicalCaretXY.X] in IdentChars) or
+    not (line[LogicalCaretXY.X-1] in IdentChars)  then exit;
   old := GetWordAtRowCol(LogicalCaretXY);
   DcdWrapper.getLocalSymbolUsageFromCursor(locs);
   if length(locs) = 0 then