Преглед на файлове

* Remove debug statement (bug ID 37940)

git-svn-id: trunk@47120 -
michael преди 5 години
родител
ревизия
827bb70333
променени са 1 файла, в които са добавени 0 реда и са изтрити 4 реда
  1. 0 4
      packages/fcl-web/src/base/custmicrohttpapp.pp

+ 0 - 4
packages/fcl-web/src/base/custmicrohttpapp.pp

@@ -644,10 +644,6 @@ begin
     @DoMHDRequest, Self,
     MHD_OPTION_NOTIFY_COMPLETED, @HandleRequestCompleted,
     Nil,MHD_OPTION_END);
-  if Result=Nil then
-    Writeln('a')
-  else
-    Writeln('b');
 end;
 
 procedure TMicroHTTPHandler.Run;