--- trunk/lib/Sack/Server.pm 2010/01/31 18:18:38 263 +++ trunk/lib/Sack/Server.pm 2010/02/01 22:03:02 264 @@ -229,6 +229,11 @@ |; + my $out = Sack::Merge->out; + if ( my $li = join("\n", map { qq|
  • $_| } keys %$out ) ) { + print $send qq|

    Results

    \n|; + } + print $send qq|

    Views

    | ; - my $out = Sack::Merge->out; - if ( my $li = join("\n", map { qq|
  • $_| } keys %$out ) ) { - print $send qq|

    Results

    \n|; - } - print $send qq|

    Nodes

    |; foreach my $node ( keys %{ $info->{node} } ) { my $class = join(' '