From 8ec18c957fd9ab8be77d6badedccd607f18d3892 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Thu, 3 Aug 2006 15:42:23 +0000
Subject: [PATCH] more test debug output

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

diff --git a/t/Macro/Include.t b/t/Macro/Include.t
index d99fc1d8d..e455b2b89 100644
--- a/t/Macro/Include.t
+++ b/t/Macro/Include.t
@@ -32,7 +32,8 @@ my $storage = WebGUI::Storage->createTemp($session);
 $storage->addFileFromScalar('goodFile', $goodFile);
 $storage->addFileFromScalar('twoLines', $twoLines);
 $storage->addFileFromScalar('unreadableFile', 'The contents of this file are not readable');
-chmod(0111, $storage->getPath('unreadableFile')) or diag($!);
+chmod(0111, $storage->getPath('unreadableFile'))
+	diag("Unable to chmod file.");
 
 my @testSets = (
 	{