paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-14 12:49:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed bug #24814

Browse Source 
git-svn-id: trunk@25204 -
This commit is contained in:
michael 2013-08-02 07:17:36 +00:00
parent 00a0bf992f
commit 5fa6d73619
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-web/src/base/fphttpserver.pp
View File

@ -637,8 +637,6 @@ begin
except except
// Do not let errors in user code escape. // Do not let errors in user code escape.
end end
else
Writeln('Unhandled exception : ',E.ClassName,' : ',E.Message);
end; end;
function TFPCustomHttpServer.GetActive: Boolean; function TFPCustomHttpServer.GetActive: Boolean;