+ } elsif ($sort eq 'D') {
+ die "\$user not defined for $call" if !defined $user;
+ if ($user->{sort} eq 'A') { # we will have a symbolic ref to a proc here
+ $dxchan->pc_normal($line);
+ } else {
+ $dxchan->user_normal($line);
+ }
+ disconnect($dxchan) if ($dxchan->{state} eq 'bye');