From 1f208018566520a024366e6d5714d0e7904caefa Mon Sep 17 00:00:00 2001 From: Richard Fuchs Date: Fri, 14 Jun 2013 09:03:09 -0400 Subject: [PATCH] small fix to test script --- tests/simulator-ng.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/simulator-ng.pl b/tests/simulator-ng.pl index 672e1387f..e84441a18 100755 --- a/tests/simulator-ng.pl +++ b/tests/simulator-ng.pl @@ -188,9 +188,9 @@ sub gen_rtcp_session_keys { sub rtcp_encrypt { my ($r, $ctx, $dir) = @_; - if (!$$ctx{rtcp_session_key}) { + if (!$$ctx{$dir}{rtcp_session_key}) { ($$ctx{$dir}{rtcp_session_key}, $$ctx{$dir}{rtcp_session_auth_key}, $$ctx{$dir}{rtcp_session_salt}) - = gen_rtp_session_keys($$ctx{$dir}{rtp_master_key}, $$ctx{$dir}{rtp_master_salt}); + = gen_rtcp_session_keys($$ctx{$dir}{rtp_master_key}, $$ctx{$dir}{rtp_master_salt}); } my $idx = $$ctx{$dir}{rtcp_index} || 0;