# this is how a pc connection starts (for an incoming connection)
# issue a PC38 followed by a PC18, then wait for a PC20 (remembering
# all the crap that comes between).
# this is how a pc connection starts (for an incoming connection)
# issue a PC38 followed by a PC18, then wait for a PC20 (remembering
# all the crap that comes between).
- $self->{normal} = \&pc_normal;
- $self->{finish} = \&pc_finish;
+ my $call = $self->call;
+
+ # do we have him connected on the cluster somewhere else?
+ if (DXCluster->get
+ $self->pc38();
+ $self->pc18();
+ $self->{state} = 'incoming';
# This is called from inside the main cluster processing loop and is used
# for despatching commands that are doing some long processing job
#
# This is called from inside the main cluster processing loop and is used
# for despatching commands that are doing some long processing job
#