From 8f831338df6d0a6362ee1e56f0d33307de48643e Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <eelco.dolstra@logicblox.com>
Date: Sun, 9 Jan 2011 22:52:27 +0000
Subject: [PATCH] * Log top-level errors.

svn path=/nixos/trunk/; revision=25482
---
 lib/test-driver/test-driver.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lib/test-driver/test-driver.pl b/lib/test-driver/test-driver.pl
index 0162832db87..9f5054f7721 100644
--- a/lib/test-driver/test-driver.pl
+++ b/lib/test-driver/test-driver.pl
@@ -66,7 +66,10 @@ sub runTests {
     if (defined $ENV{tests}) {
         $log->nest("running the VM test script", sub {
             eval "$context $ENV{tests}";
-            die $@ if $@;
+            if ($@) {
+                $log->log("error: $@", { error => 1 });
+                die $@;
+            }
         }, { expanded => 1 });
     } else {
         my $term = Term::ReadLine->new('nixos-vm-test');