First checkin of the reversion back from the failed optimization effort. I will be...
[dbsrgits/DBM-Deep.git] / t / 27_filehandle.t
index 006f26a..aff3007 100644 (file)
@@ -98,7 +98,7 @@ locking => 0,
         } qr/Cannot write to a readonly filehandle/, "Can't write to a read-only filehandle";
         ok( !$db->exists( 'foo' ), "foo still doesn't exist" );
 
-        is( $db->{x}, 'b', "x is still 'b'" );
+        is( $db->{x}, 'b' );
     }
 
     exec( "$^X -Iblib/lib $filename" );