From 8578afaa167e05742f883c961e7dd1c49dffc438 Mon Sep 17 00:00:00 2001 From: djk Date: Mon, 8 Nov 1999 13:21:50 +0000 Subject: [PATCH] detail changes to dbshow --- cmd/dbshow.pl | 1 + perl/Messages | 1 + 2 files changed, 2 insertions(+) diff --git a/cmd/dbshow.pl b/cmd/dbshow.pl index f48def42..44653152 100644 --- a/cmd/dbshow.pl +++ b/cmd/dbshow.pl @@ -13,6 +13,7 @@ my $db = DXDb::getdesc($name); return (1, $self->msg('db3', $name)) unless $db; if ($db->remote) { + push @out, $self->msg('db11', $db->remote); for (@f) { my $n = DXDb::newstream($self->call); DXProt::route(undef, $db->remote, DXProt::pc44($main::mycall, $db->remote, $n, uc $db->name,uc $_, $self->call)); diff --git a/perl/Messages b/perl/Messages index ab524d3b..3d3f2b02 100644 --- a/perl/Messages +++ b/perl/Messages @@ -35,6 +35,7 @@ package DXM; db8 => 'Database $_[0] created locally', db9 => 'Database $_[0] removed', db10 => '$_[0] records imported into $_[1]', + db11 => 'Sending your request(s) to $_[0], please stand by...', dx1 => 'Frequency $_[0] not in band (see show/band); usage: DX [BY call] freq call comments', dx2 => 'Need a callsign; usage: DX [BY call] freq call comments', dxs => 'DX Spots flag set on $_[0]', -- 2.34.1