X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F27_filehandle.t;h=006f26ae88268ae3b4bfbab1f8f3dee54daecc55;hb=f3c5ac069e63f4c335f3488f6f32b1f00bd3a0d8;hp=aff3007b79f6565d9f0b5da012148ece439db931;hpb=18ec00af0694b8d206d56289b9855c26493a3da5;p=dbsrgits%2FDBM-Deep.git diff --git a/t/27_filehandle.t b/t/27_filehandle.t index aff3007..006f26a 100644 --- a/t/27_filehandle.t +++ b/t/27_filehandle.t @@ -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' ); + is( $db->{x}, 'b', "x is still 'b'" ); } exec( "$^X -Iblib/lib $filename" );