src/PMG/CLI/pmgconfig.pm: raise error when api returns no dkim_selector

Instead of writing a warning about usinag an undefined value.

diff --git a/src/PMG/CLI/pmgconfig.pm b/src/PMG/CLI/pmgconfig.pm
index 49d5be29e1e3d6d2fe4d31d83ef1420fb84bc377..85edfa52b09cf11d9d0042c1ce663d57b2d07a77 100644 (file)
--- a/src/PMG/CLI/pmgconfig.pm
+++ b/src/PMG/CLI/pmgconfig.pm
@@ -195,6 +195,7 @@ our $cmddef = {
     dkim_record => [ 'PMG::API2::DKIMSign', 'get_selector_info', [], undef,
        sub {
            my ($res) = @_;
+           die "no dkim_selector configured\n" if !defined($res->{record});
            print "$res->{record}\n";
        }],
 };