more test debug output

This commit is contained in:
Colin Kuskie 2006-08-03 15:42:23 +00:00
parent d3df45f989
commit 8ec18c957f

View file

@ -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 = (
{