fixed DELETE for a nonexistent entry
This commit is contained in:
parent
317b78815a
commit
a94bdc6ca2
2 changed files with 6 additions and 1 deletions
|
@ -28,6 +28,9 @@ my $tmp = tempdir( CLEANUP => 1 );
|
|||
is($hash{yay}, 'yappo');
|
||||
$hash{foo} = 'baz';
|
||||
is($hash{foo}, 'baz');
|
||||
$hash{delete} = 'delete';
|
||||
is(delete $hash{delete}, 'delete');
|
||||
is(delete $hash{delete}, undef);
|
||||
|
||||
is(join(" ", sort keys %hash), "foo yay");
|
||||
is(join(" ", sort values %hash), "baz yappo");
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue