From 2ce3c95aae65acb6463f2a2445654780cf7eb9ca Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sun, 28 Oct 2007 17:43:01 +0000 Subject: [PATCH] fix server test to use new current_store accessor to store plugin git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@174 836a5e1a-633d-0410-964b-294494ad4392 --- t/30-server.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/30-server.t b/t/30-server.t index 212bbc0..d8bcbd4 100755 --- a/t/30-server.t +++ b/t/30-server.t @@ -170,7 +170,7 @@ my $state = { EventStruct => ["0 BOOTSTRAP", "1 BOOT", "4 VALUE CHANGE"], ID => "1_THOM_TR69_ID", MaxEnvelopes => 2, - NoMoreRequests => undef, +# NoMoreRequests => undef, Parameter => { "\nInternetGatewayDevice.DeviceInfo.SpecVersion" => "1.1", ".ExternalIPAddress" => "192.168.1.254", @@ -189,7 +189,7 @@ my $state = { _dispatch => "InformResponse", }; -is_deeply( $store->get_state( ID => '1_THOM_TR69_ID' ), $state, 'new store->get_state' ); +is_deeply( $store->current_store->get_state( 'CP0644JTHJ4' ), $state, 'store->current_store->get_state' ); ok( kill(9,$pid), 'kill ' . $pid ); -- 2.20.1