[WWcvs] pg: Undoing some of the temporary changes I made to the warn message.

[Mike G. v. a. <act...@de...>]

Log Message:
-----------
Undoing some of the temporary changes I made to the warn message.

This may break what happens with xmlrpc however. (sigh)

Modified Files:
--------------
    pg/lib/WeBWorK/PG:
        Translator.pm

Revision Data
-------------
Index: Translator.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/WeBWorK/PG/Translator.pm,v
retrieving revision 1.10
retrieving revision 1.11
diff -Llib/WeBWorK/PG/Translator.pm -Llib/WeBWorK/PG/Translator.pm -u -r1.10 -r1.11
--- lib/WeBWorK/PG/Translator.pm
+++ lib/WeBWorK/PG/Translator.pm
@@ -794,8 +794,10 @@
 	     unless defined( $self->{envir} );
     # reset the error detection
     my $save_SIG_warn_trap = $SIG{__WARN__};
-#    $SIG{__WARN__} = sub {&$save_SIG_warn_trap(PG_errorMessage('message',@_))};
-    $SIG{__WARN__} = sub {CORE::die(PG_errorMessage('message',@_))};
+    #FIXME  -- this may not work with the xmlrpc access
+    # this formats the error message within the existing warn message.
+    $SIG{__WARN__} = sub {&$save_SIG_warn_trap(PG_errorMessage('message',@_))};
+    #$SIG{__WARN__} = sub {CORE::warn(PG_errorMessage('message',@_))};
     my $save_SIG_die_trap = $SIG{__DIE__};
     $SIG{__DIE__} = sub {CORE::die(PG_errorMessage('traceback',@_))};