my $prefix = "Debian Desc Search of '$query' ";
&::pSReply( &::formListReply(0, $prefix, ) );
} elsif (scalar @list == 1) { # list = 1.
my $prefix = "Debian Desc Search of '$query' ";
&::pSReply( &::formListReply(0, $prefix, ) );
} elsif (scalar @list == 1) { # list = 1.