mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-26 10:39:18 +02:00
IDE: fix a potential crash in FPDOC options dialog
git-svn-id: trunk@33207 -
This commit is contained in:
parent
9cee7a46ed
commit
04679166cb
@ -98,7 +98,8 @@ end;
|
||||
|
||||
procedure TFpDocOptionsFrame.LazDocDeletePathButtonClick(Sender: TObject);
|
||||
begin
|
||||
LazDocListBox.Items.Delete(LazDocListBox.ItemIndex);
|
||||
if LazDocListBox.ItemIndex >= 0 then
|
||||
LazDocListBox.Items.Delete(LazDocListBox.ItemIndex);
|
||||
end;
|
||||
|
||||
class function TFpDocOptionsFrame.SupportedOptionsClass: TAbstractIDEOptionsClass;
|
||||
|
Loading…
Reference in New Issue
Block a user