1) forgot to add some t/5* tests to the MANIFEST 2) The one line patch to Engine...

[dbsrgits/DBM-Deep.git] / t / 26_scalar_ref.t

diff --git a/t/26_scalar_ref.t b/t/26_scalar_ref.t
index 71109a0..7f6e3e7 100644 (file)
--- a/t/26_scalar_ref.t
+++ b/t/26_scalar_ref.t
@@ -14,22 +14,22 @@ my $x = 25;
 
     throws_ok {
         $db->{scalarref} = \$x;
-    } qr/Storage of variables of type 'SCALAR' is not supported/,
+    } qr/Storage of references of type 'SCALAR' is not supported/,
     'Storage of scalar refs not supported';
 
     throws_ok {
         $db->{scalarref} = \\$x;
-    } qr/Storage of variables of type 'REF' is not supported/,
+    } qr/Storage of references of type 'REF' is not supported/,
     'Storage of ref refs not supported';
 
     throws_ok {
         $db->{scalarref} = sub { 1 };
-    } qr/Storage of variables of type 'CODE' is not supported/,
+    } qr/Storage of references of type 'CODE' is not supported/,
     'Storage of code refs not supported';
 
     throws_ok {
-        $db->{scalarref} = $db->_get_self->_fh;
-    } qr/Storage of variables of type 'GLOB' is not supported/,
+        $db->{scalarref} = $fh;
+    } qr/Storage of references of type 'GLOB' is not supported/,
     'Storage of glob refs not supported';
 
     $db->{scalar} = $x;