make sure that locally connected things get a route pc19

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 5f910bbbc4cc6ffd99ef40426f447797ce6b49b8..efa5ff9b57d5e058eb3ac64c3a727e4296044bda 100644 (file)
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -911,6 +911,7 @@ sub normal
                                                my $new = Route->new($call);          # throw away
                                                if ($self->in_filter_route($new)) {
                                                        my $ar = $parent->add($call, $ver, $flags);
+                                                       $user->wantroutepc19(1) unless defined $user->wantroutepc19;
                                                        push @rout, $ar if $ar;
                                                } else {
                                                        next;