From b8506d89844cb4c835e1964c09ca8692bee9c22d Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Sun, 10 May 2020 23:51:12 +0100 Subject: [PATCH] fix echo typo --- perl/DXCommandmode.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 18c5807b..9d9f60b4 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -553,7 +553,7 @@ sub run_cmd if (isdbg('progress')) { my $msecs = _diffms($t0); my $s = "CMD: '$cmd $args' by $call ip: $self->{hostname} ${msecs}mS"; - dbg($s) if $cmd =~/(?:echo|blank)/ || isdbg('echo'); # cut down a bit on HRD and other clients' noise + dbg($s) if $cmd !~ /^(?:echo|blank)/ || isdbg('echo'); # cut down a bit on HRD and other clients' noise } } else { dbg("cmd: $package not present") if isdbg('command'); -- 2.43.0