From 44c6048da44f6d0cdc80a352b0c953d42e7dfe72 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Wed, 3 Mar 2010 11:10:16 -0800 Subject: [PATCH] Update test for exception handling. --- t/Asset/Wobject/Shelf.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/Asset/Wobject/Shelf.t b/t/Asset/Wobject/Shelf.t index dd0bf23f9..5612401c6 100644 --- a/t/Asset/Wobject/Shelf.t +++ b/t/Asset/Wobject/Shelf.t @@ -375,8 +375,8 @@ SKIP: { $shelf->purge; undef $shelf; - $record = WebGUI::Asset::Sku->newBySku($session, 'classical-records-1'); - is($record, undef, 'deleting a shelf deletes all products beneath it'); + $record = eval { WebGUI::Asset::Sku->newBySku($session, 'classical-records-1'); }; + ok(Exception::Class->caught(), 'deleting a shelf deletes all products beneath it'); ####################################################################### #