This was for debugging

yannk · Jun 10, 2010 · 6e8af06 · 6e8af06
1 parent f77d7d0
commit 6e8af06
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Avro/DataFileReader.pm b/lib/Avro/DataFileReader.pm
@@ -70,7 +70,7 @@ sub read_file_header {
         writer_schema => $Avro::DataFile::HEADER_SCHEMA,
         reader        => $datafile->{fh},
     );
-    confess "Magic '$data->{magic}' doesn't match"
+    croak "Magic '$data->{magic}' doesn't match"
         unless $data->{magic} eq Avro::DataFile->AVRO_MAGIC;
 
     $datafile->{sync_marker} = $data->{sync}