mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-16 06:09:29 +02:00
IDE: code help: clearing error on success
git-svn-id: trunk@21311 -
This commit is contained in:
parent
321aab22e3
commit
58414835f9
@ -1141,6 +1141,7 @@ begin
|
||||
Result:=chprFailed;
|
||||
try
|
||||
ReadXMLFile(ADocFile.Doc,MemStream,CurFilename);
|
||||
ADocFile.DocErrorMsg:='';
|
||||
Result:=chprSuccess;
|
||||
except
|
||||
on E: EXMLReadError do begin
|
||||
|
Loading…
Reference in New Issue
Block a user