mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 08:59:32 +02:00
ide: add watch at cursor: add full expression instead of the current word
git-svn-id: trunk@21970 -
This commit is contained in:
parent
71d8ecf4de
commit
a27471e433
@ -1337,7 +1337,7 @@ begin
|
||||
// get the sourceEditor.
|
||||
SE := TSourceNotebook(Sender).GetActiveSE;
|
||||
if not Assigned(SE) then Exit;
|
||||
WatchVar := SE.GetWordAtCurrentCaret;
|
||||
WatchVar := SE.GetOperandAtCurrentCaret;
|
||||
if WatchVar = '' then Exit;
|
||||
|
||||
if (Watches.Find(WatchVar) = nil)
|
||||
|
Loading…
Reference in New Issue
Block a user