X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=installcheck%2FAmanda_Changer_single.pl;h=1f876d69f1e643f2ed3d0f60592a89456a6054ec;hb=3c4bb2012986d596b3ee0e65fac4b2c5b7b01540;hp=f2c42cf5f4879e52651994789d59824f6df815c3;hpb=42ff24f2a525d5965e1841b2ebe3ee0f4b918ac6;p=debian%2Famanda diff --git a/installcheck/Amanda_Changer_single.pl b/installcheck/Amanda_Changer_single.pl index f2c42cf..1f876d6 100644 --- a/installcheck/Amanda_Changer_single.pl +++ b/installcheck/Amanda_Changer_single.pl @@ -104,8 +104,10 @@ die "$chg" if $chg->isa("Amanda::Changer::Error"); $get_info->(); Amanda::MainLoop::run(); } +$chg->quit(); $chg = Amanda::Changer->new("chg-single:bogus:device"); is("$chg", "chg-single: error opening device 'bogus:device': Device type bogus is not known.", "bogus device name detected early"); +$chg->quit();