X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FThingy%2FRouteFilter.pm;h=ac238ffef048782b8e13d3865666b839ba96b0d6;hb=4932835e5f1bdcfc118f93697b8a685ba2c0c083;hp=0e5bf3e8ce3a0dec514a78f80bdd3edee398b2e3;hpb=4d22d5fd3874e8292d82f84a777b99ff7d10402a;p=spider.git

diff --git a/perl/Thingy/RouteFilter.pm b/perl/Thingy/RouteFilter.pm
index 0e5bf3e8..ac238ffe 100644
--- a/perl/Thingy/RouteFilter.pm
+++ b/perl/Thingy/RouteFilter.pm
@@ -39,7 +39,7 @@ sub gen_DXProt
 	my $thing = shift;
 	my @out;
 	push @out, DXProt::pc21(@{$thing->{fpc21n}}) if $thing->{fpc21n};
-	push @out, DXProt::pc17($thing->{fpc17n}, $thing->{pc17u})  if $thing->{fpc17n};
+	push @out, DXProt::pc17($thing->{fpc17n}, @{$thing->{pc17u}})  if $thing->{fpc17n};
 	push @out, DXProt::pc19(@{$thing->{fpc19n}}) if $thing->{fpc19n};
 	push @out, DXProt::pc16($thing->{fpc16n}, @{$thing->{pc16u}}) if $thing->{fpc16n};
 	return \@out;