projects
/
debian
/
amanda
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Imported Upstream version 3.3.0
[debian/amanda]
/
perl
/
Amanda
/
Changer
/
robot.pm
diff --git
a/perl/Amanda/Changer/robot.pm
b/perl/Amanda/Changer/robot.pm
index 924b2101b2ca6cf5fbcaa2de72ab1b15f6b10e7d..aa53f982ada680ea2e30e11daa68391529659c9b 100644
(file)
--- a/
perl/Amanda/Changer/robot.pm
+++ b/
perl/Amanda/Changer/robot.pm
@@
-193,7
+193,7
@@
sub new {
}
# eject-before-unload
}
# eject-before-unload
- my $ebu = $self->
get_boolean_property($self->{'config'},
+ my $ebu = $self->
{'config'}->get_boolean_property(
"eject-before-unload", 0);
if (!defined $ebu) {
return Amanda::Changer->make_error("fatal", undef,
"eject-before-unload", 0);
if (!defined $ebu) {
return Amanda::Changer->make_error("fatal", undef,
@@
-202,7
+202,7
@@
sub new {
$self->{'eject_before_unload'} = $ebu;
# fast-search
$self->{'eject_before_unload'} = $ebu;
# fast-search
- my $fast_search = $self->
get_boolean_property($self->{'config'},
+ my $fast_search = $self->
{'config'}->get_boolean_property(
"fast-search", 1);
if (!defined $fast_search) {
return Amanda::Changer->make_error("fatal", undef,
"fast-search", 1);
if (!defined $fast_search) {
return Amanda::Changer->make_error("fatal", undef,
@@
-287,7
+287,7
@@
sub new {
$self->{$key} = $time;
}
$self->{$key} = $time;
}
- my $ignore_barcodes = $self->
get_boolean_property($self->{'config'},
+ my $ignore_barcodes = $self->
{'config'}->get_boolean_property(
"ignore-barcodes", 0);
if (!defined $ignore_barcodes) {
return Amanda::Changer->make_error("fatal", undef,
"ignore-barcodes", 0);
if (!defined $ignore_barcodes) {
return Amanda::Changer->make_error("fatal", undef,
@@
-416,7
+416,7
@@
sub load_unlocked {
if ($state->{'slots'}->{$slot}->{'state'} eq Amanda::Changer::SLOT_EMPTY) {
return $self->make_error("failed", $params{'res_cb'},
if ($state->{'slots'}->{$slot}->{'state'} eq Amanda::Changer::SLOT_EMPTY) {
return $self->make_error("failed", $params{'res_cb'},
- reason => "
notfound
",
+ reason => "
empty
",
message => "slot $slot is empty");
}
message => "slot $slot is empty");
}