From d159dc5c4d04124bf2672ef719d2ee412e777bcb Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Sun, 26 Apr 2020 00:01:23 +0100 Subject: [PATCH] fix sh/cl at user startup with new arrangements --- perl/DXCommandmode.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 6306b7fb..d75d3a16 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -210,8 +210,7 @@ sub start $script->run($self) if $script; # send cluster info - my $info = Route::cluster(); - $self->send("Cluster:$info"); + $self->send($self->run_cmd("show/cluster")); # send prompts for qth, name and things $self->send($self->msg('namee1')) if !$user->name; -- 2.34.1