From bfa8abc01ab2d6bec39990edf1721e7db1fe852e Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Tue, 3 Aug 2010 15:06:43 +0200 Subject: [PATCH] fixed test for write_blocks --- t/10-3M-810.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/10-3M-810.t b/t/10-3M-810.t index 259d18d..c4d2101 100755 --- a/t/10-3M-810.t +++ b/t/10-3M-810.t @@ -22,7 +22,7 @@ foreach my $tag ( @tags ) { ok( my $afi = $o->read_afi( $tag ), "read_afi $tag" ); - ok( $o->write_blocks( $tag, $blocks->{tag} ), "write_blocks $tag" ); + ok( $o->write_blocks( $tag, $blocks->{$tag} ), "write_blocks $tag" ); my $new_afi = "\x42"; -- 2.20.1