mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-07 12:18:03 +02:00
IDE: setup dialog: always switch to first error
git-svn-id: branches/fixes_1_6@50717 -
This commit is contained in:
parent
ca42e581e6
commit
fa0e3b0619
@ -1317,12 +1317,10 @@ begin
|
||||
UpdateDebuggerNote;
|
||||
|
||||
// select first error
|
||||
if PropertiesTreeView.Selected=nil then begin
|
||||
Node:=FirstErrorNode;
|
||||
if Node=nil then
|
||||
Node:=TVNodeLazarus;
|
||||
PropertiesTreeView.Selected:=Node;
|
||||
end;
|
||||
Node:=FirstErrorNode;
|
||||
if Node=nil then
|
||||
Node:=TVNodeLazarus;
|
||||
PropertiesTreeView.Selected:=Node;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
Loading…
Reference in New Issue
Block a user