-# Copyright (c) 2009, 2010 Zmanda Inc. All Rights Reserved.
+# Copyright (c) 2009-2012 Zmanda Inc. All Rights Reserved.
#
# This program is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License version 2 as published
} else {
$msg = $params{'error'};
}
- log_add($L_ERROR, $msg);
+ log_add($L_ERROR, "$msg");
print STDERR "$msg\n";
$self->{'proto'}->send(Amanda::Taper::Protocol::BAD_COMMAND,
message => $msg);
$worker->FAILED(@_);
}
+sub msg_CLOSE_VOLUME {
+ my $self = shift;
+ my ($msgtype, %params) = @_;
+
+ my $worker = $self->{'worker'}->{$params{'worker_name'}};
+ $worker->CLOSE_VOLUME(@_);
+}
+
sub msg_TAKE_SCRIBE_FROM {
my $self = shift;
my ($msgtype, %params) = @_;