X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdbshow.pl;h=6290dd3a5abc3c1d52aa2447eedff3edcef66171;hb=refs%2Fheads%2Fnewpc92timings;hp=8d393b98985f2e783245816fa61b88371bf937da;hpb=3ce9a942c76920cb3cf556b2c8a556ef0cc448c7;p=spider.git diff --git a/cmd/dbshow.pl b/cmd/dbshow.pl index 8d393b98..6290dd3a 100644 --- a/cmd/dbshow.pl +++ b/cmd/dbshow.pl @@ -24,7 +24,7 @@ foreach $n (@db) { if ($db->remote) { # remote databases - unless (Route::Node::get($db->remote) || DXChannel->get($db->remote)) { + unless (Route::Node::get($db->remote) || DXChannel::get($db->remote)) { push @out, $self->msg('db4', uc $name, $db->remote); last; } @@ -40,12 +40,13 @@ foreach $n (@db) { # local databases can chain to remote ones my $count; - push @out, $db->print('pre'); + my $pre = $db->print('pre'); + push @out, $pre if defined $pre; # push @out, "@f"; for (@f) { -# push @out, $db->name . " $_"; + push @out, $db->name . " $_"; my $value = $db->getkey($_) || ""; - push @out, $db->name . ": $_ :"; +# push @out, $db->name . ": $_ :"; if ($value) { push @out, split /\n/, $value; $count++; @@ -54,7 +55,8 @@ foreach $n (@db) { } } if ($count) { - push @out, $db->print('post'); + my $post = $db->print('post'); + push @out, $post if $post; # last; } }