Fix for die message (use 0 instead of )

Author: caleishm

Changes

@@ -1,3 +1,7 @@
+2006-02-14
+	- Fix in File::Heap::add for the die message when DB_File::put
+	  fails (credit to Eli Yelluas).
+
 2006-02-01
 	- Bugfix release (2.04)
 	- Fix for failure to call load_callback when verify_callback
@@ -23,12 +27,12 @@
 
 2003-08-18
 	- Bugfix release (2.01)
-	 o Fixed parsing of all digit expiry times
-	 o Fixed use of scalar validity in Cache::Memory
-	 o Allowed validity to be set on non-existant entry
-	   (sets entry data to zero length)
-	 o Fixed package name for Cache::Memory::HeapElem
-	 o Documentation fixes
+	- Fixed parsing of all digit expiry times
+	- Fixed use of scalar validity in Cache::Memory
+	- Allowed validity to be set on non-existant entry
+	  (sets entry data to zero length)
+	- Fixed package name for Cache::Memory::HeapElem
+	- Documentation fixes
 
 2003-07-07
 	- Initial release (2.00)

lib/Cache/File/Heap.pm

@@ -117,7 +117,7 @@ sub add {
     defined $key or croak "key undefined";
     defined $val or croak "value undefined";
     # return code from DB_File is 0 on success.....
-    $self->_db->put($key, $val) and die "Heap add failed: $@";
+    $self->_db->put($key, $val) and die "Heap add failed: $!";
 }
 
 =item $h->delete($key, $val)
@@ -256,6 +256,6 @@ This module is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND,
 either expressed or implied. This program is free software; you can
 redistribute or modify it under the same terms as Perl itself.
 
-$Id: Heap.pm,v 1.6 2006-01-31 15:23:58 caleishm Exp $
+$Id: Heap.pm,v 1.7 2006-02-14 05:55:21 caleishm Exp $
 
 =cut