From 4cfad9cd501203dbfec17c8a5a4afb72cfd36318 Mon Sep 17 00:00:00 2001 From: Jed Reynolds Date: Wed, 18 Mar 2020 16:22:18 -0700 Subject: [PATCH] vid_group: turns off verbose logging, fixes sleep call --- l3_vid_group.pl | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/l3_vid_group.pl b/l3_vid_group.pl index c36898d3..fb233cb8 100755 --- a/l3_vid_group.pl +++ b/l3_vid_group.pl @@ -154,6 +154,7 @@ if (defined $log_cli) { our $utils = new LANforge::Utils; $::utils->connect($lfmgr_host, $lfmgr_port); +#$::utils->doCmd("log_level 8"); # ------ ------ ------ ------ ------ ------ ------ ------ ------ ------ ------ # M A I N @@ -302,7 +303,7 @@ if ($::action eq "create") { .q(--endp_cmd ").$cmd.q("); print "CMD: $cmd2\n"; `$cmd2`; - sleep_ms(20); + $::utils->sleep_ms(20); $::utils->doAsyncCmd($::utils->fmt_cmd("add_tgcx", $::generic_test_grp, $gname)); } @@ -338,3 +339,9 @@ else { } # ------ ------ ------ ------ ------ ------ ------ ------ ------ ------ ------ +#END { +# if (defined $::utils->{telnet}) { +# print STDERR "reducing log level"; +# $::utils->doCmd("log_level 2"); +# } +#} \ No newline at end of file