Changeset 150

Show
Ignore:
Timestamp:
02/08/09 20:47:15 (10 months ago)
Author:
swistow
Message:

made scoreboard.t print out what the error was if there was one when doing the work

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/t/scoreboard.t

    r134 r150  
    3939 
    4040        my $rv = eval { Worker::Addition->work_safely($job); }; 
    41         ok(length($@) == 0, 'Finished job with out error'); 
     41        ok(length($@) == 0, 'Finished job with out error') 
     42            or diag($@); 
    4243 
    4344        unless (ok(-e $sb_file, "Scoreboard file exists")) {