ErrorSys fix

[Antonio Linares]

In recent FWH versions these lines were placed in source\errorsysw.prg to avoid recursive errors:

Code: Select all  Expand view

   ErrorBlock( {|e| MsgStop( ErrorMessage(e) + " from Errorsys, line:" + ;
                             Str( ProcLine( 1 ), 3 ) ), __quit() } )


They must be removed in order to avoid errors "hangs" that force us to press Ctrl+Alt+Del to remove our application.