PDU: pause: Honour OSSTEST_PDU_NOPAUSE

For debugging.

Signed-off-by: Ian Jackson <ian.jackson@eu.citrix.com>

diff --git a/Osstest/PDU/pause.pm b/Osstest/PDU/pause.pm
index 9e839c6e97eee0b6aa24ff75cacb6b24ee4f8fc7..b5f0322f2f51aea790078907c3654e80bc44019c 100644 (file)
--- a/Osstest/PDU/pause.pm
+++ b/Osstest/PDU/pause.pm
@@ -46,6 +46,7 @@ sub new {
 
 sub pdu_power_state {
     my ($mo, $on) = @_;
+    return if $ENV{OSSTEST_PDU_NOPAUSE};
     my $delay = $mo->[!!$on];
     logm("power: pdu operation pausing for ${delay}s");
     sleep $delay;