From 7324ab910c310a1e5949b4e2437624429f8b2810 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Wed, 10 Jul 2002 13:01:03 +0000
Subject: Die when you cannot parse metadata or conf

---
 Echolot/Storage/File.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Echolot/Storage')

diff --git a/Echolot/Storage/File.pm b/Echolot/Storage/File.pm
index ae8261d..68b5242 100644
--- a/Echolot/Storage/File.pm
+++ b/Echolot/Storage/File.pm
@@ -1,7 +1,7 @@
 package Echolot::Storage::File;
 
 # (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: File.pm,v 1.29 2002/07/10 11:54:52 weasel Exp $
+# $Id: File.pm,v 1.30 2002/07/10 13:01:03 weasel Exp $
 #
 
 =pod
@@ -172,7 +172,7 @@ sub metadata_read($) {
 			$self->{'METADATA'} = $METADATA;
 		};
 		$EVAL_ERROR and
-			cluck("Error when reading from metadata file: $EVAL_ERROR"),
+			croak("Error when reading from metadata file: $EVAL_ERROR"),
 			return 0;
 
 		defined($self->{'METADATA'}->{'version'}) or
-- 
cgit v1.2.3