Просмотр исходного кода

* Do not show exception twice

git-svn-id: trunk@15107 -
joost 15 лет назад
Родитель
Сommit
41ff50c65a
1 измененных файлов с 0 добавлено и 3 удалено
  1. 0 3
      packages/fcl-web/src/custweb.pp

+ 0 - 3
packages/fcl-web/src/custweb.pp

@@ -279,10 +279,7 @@ begin
       M.HandleRequest(ARequest,AResponse);
   except
     On E : Exception do
-      begin
-      ShowException(E);
       ShowRequestException(AResponse,E);
-      end;
   end;
 end;