summaryrefslogtreecommitdiff
path: root/Echolot/Storage/File.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Echolot/Storage/File.pm')
-rw-r--r--Echolot/Storage/File.pm11
1 files changed, 4 insertions, 7 deletions
diff --git a/Echolot/Storage/File.pm b/Echolot/Storage/File.pm
index b00d47d..85668c5 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.32 2002/07/11 17:42:48 weasel Exp $
+# $Id: File.pm,v 1.33 2002/07/11 23:20:54 weasel Exp $
#
=pod
@@ -67,14 +67,11 @@ sub new {
$self->delay_commit();
$self->metadata_open() or
- cluck ('Opening Metadata failed. Exiting'),
- exit 1;
+ confess ('Opening Metadata failed. Exiting');
$self->metadata_read() or
- cluck ('Reading Metadata from Storage failed. Exiting'),
- exit 1;
+ confess ('Reading Metadata from Storage failed. Exiting');
$self->pingdata_open() or
- cluck ('Opening Ping files failed. Exiting'),
- exit 1;
+ confess ('Opening Ping files failed. Exiting');
$self->enable_commit();
return $self;