X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=installcheck%2FAmanda_Changer_single.pl;h=1f876d69f1e643f2ed3d0f60592a89456a6054ec;hb=refs%2Ftags%2Fdebian%2F3.3.1-2;hp=f2c42cf5f4879e52651994789d59824f6df815c3;hpb=b116e9366c7b2ea2c2eb53b0a13df4090e176235;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();