fixed dbshow to do it only once!

diff --git a/cmd/dbshow.pl b/cmd/dbshow.pl
index 967cb469e90ff6b3e3112593a78d07b96799fb69..503eafd1e1cefd572a757ea76ea7ef95c255a4b2 100644 (file)
--- a/cmd/dbshow.pl
+++ b/cmd/dbshow.pl
@@ -41,11 +41,11 @@ foreach  $n (@db) {
                # local databases can chain to remote ones
                my $count;
                push @out, $db->print('pre');
-               push @out, "@f";
+#              push @out, "@f";
                for (@f) {
-                       push @out, $db->name . " $_";
+#                      push @out, $db->name . " $_";
                        my $value = $db->getkey($_) || "";
-                       push @out, $db->name . ": $_ : $value";
+                       push @out, $db->name . ": $_ :";
                        if ($value) {
                                push @out, split /\n/, $value;
                                $count++;