projects
/
debian
/
amanda
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'nmu'
[debian/amanda]
/
installcheck
/
Amanda_Changer_null.pl
diff --git
a/installcheck/Amanda_Changer_null.pl
b/installcheck/Amanda_Changer_null.pl
index 342bb07eb60b58d95eea1a7fbeeb2e49073d9be1..50a98c190bf889deaf169f635a7405eadc69fbc0 100644
(file)
--- a/
installcheck/Amanda_Changer_null.pl
+++ b/
installcheck/Amanda_Changer_null.pl
@@
-16,7
+16,7
@@
# Contact information: Zmanda Inc, 465 S. Mathilda Ave., Suite 300
# Sunnyvale, CA 94086, USA, or: http://www.zmanda.com
# Contact information: Zmanda Inc, 465 S. Mathilda Ave., Suite 300
# Sunnyvale, CA 94086, USA, or: http://www.zmanda.com
-use Test::More tests =>
4
;
+use Test::More tests =>
5
;
use File::Path;
use strict;
use warnings;
use File::Path;
use strict;
use warnings;
@@
-48,6
+48,7
@@
if ($cfg_result != $CFGERR_OK) {
}
my $chg = Amanda::Changer->new("chg-null:");
}
my $chg = Amanda::Changer->new("chg-null:");
+is($chg->have_inventory(), '', "changer have inventory");
{
my ($get_info, $check_info, $do_load, $got_res);
{
my ($get_info, $check_info, $do_load, $got_res);
@@
-105,3
+106,5
@@
my $chg = Amanda::Changer->new("chg-null:");
$try_eject->();
Amanda::MainLoop::run();
}
$try_eject->();
Amanda::MainLoop::run();
}
+
+$chg->quit();