From d142a0767037572181a72aa9b71be2ad3a6e1e98 Mon Sep 17 00:00:00 2001
From: Father Chrysostomos <sprout@cpan.org>
Date: Thu, 28 Jun 2012 09:24:46 -0700
Subject: [PATCH] diagnostics.t: Restore test name removed by f0e510f

---
 lib/diagnostics.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/diagnostics.t b/lib/diagnostics.t
index a789d17..48f265f 100644
--- a/lib/diagnostics.t
+++ b/lib/diagnostics.t
@@ -20,7 +20,8 @@ eval {
     'base'->import(qw(I::do::not::exist));
 };
 
-like( $@, qr/^Base class package "I::do::not::exist" is empty/);
+like( $@, qr/^Base class package "I::do::not::exist" is empty/,
+         'diagnostics not tripped up by "use base qw(Dont::Exist)"');
 
 open *whatever, ">", \my $warning
     or die "Couldn't redirect STDERR to var: $!";
-- 
2.7.4