my $f;
foreach $f (values %DXDb::avail) {
- push @out, "DB Name Location Cmd Chain" unless @out;
- push @out, sprintf "%-15s %-10s %-15s %s", $f->name, $f->remote ? $f->remote : "Local", ($f->localcmd || ""), $f->chain ? parray($f->chain) : "";
+ push @out, $self->msg('db12') unless @out;
+ push @out, sprintf "%-15s %-10s %-15s %s", $f->name, $f->remote ? $f->remote : $self->msg('local1'), ($f->localcmd || ""), $f->chain ? parray($f->chain) : "";
}
return (1, @out);