Dennis,

Try the attached patch.
You can patch the installed Amanda/Changer/rait.pm file.

Jean-Louis

On 06/27/2013 08:41 AM, Dennis Benndorf wrote:

grep meta-autolabel /etc/amanda/mirror/amanda.conf show nothing.

--

Regards

Dennis Benndorf


Am Donnerstag, 27. Juni 2013, 08:39:11 schrieb Jean-Louis Martineau:

> Dennis,

>

> Do you have 'meta-autolabel' set in your amanda.conf? unset it.

>

> Jean-Louis

>

> On 06/27/2013 08:33 AM, Dennis Benndorf wrote:

> > Ok I understand but why does it tell me those messages:

> >

> > amanda@dl380-54:~$ amlabel -f mirror slot '{225,225}'

> >

> > Reading label...

> >

> > Found Amanda volume 'D00225'.

> >

> > amlabel: Can't call method "make_new_meta_label" on an undefined value

> > at /usr/local/share/perl/5.14.2/Amanda/Changer.pm line 1632.

> >

> > amanda@dl380-54:~$ amlabel -f --barcode '{D00225,D00225}' mirror

> >

> > Reading label...

> >

> > Found Amanda volume 'D00225'.

> >

> > amlabel: Can't call method "make_new_meta_label" on an undefined value

> > at /usr/local/share/perl/5.14.2/Amanda/Changer.pm line 1632.

> >

> >

> > Regards Dennis

> >

> > Am Donnerstag, 27. Juni 2013, 07:58:19 schrieb Jean-Louis Martineau:

> > > chg-rait and chg-robot do not use meta label, don't try to set it.

> > >

> > > Only chg-disk use meta-label.

> > >

> > >

> > >

> > > The barcode is the combination of all barcodes, as the inventory told

> > >

> > > you, the barcode is '{D00225,D00225}'

> > >

> > > amlabel -f --barcode '{D00225,D00225}' mirror

> > >

> > > The same is true for the slot number, you could do:

> > >

> > > amlabel -f mirror slot '{225,225}'

> > >

> > >

> > >

> > > It is not required to put the same barcode on both tape, it is generally

> > >

> > > a bad idea to do so, a barcode must be unique.

> > >

> > >

> > >

> > > Jean-Louis


diff --git a/perl/Amanda/Changer/rait.pm b/perl/Amanda/Changer/rait.pm
index e0ef276..d6ba1dd 100644
--- a/perl/Amanda/Changer/rait.pm
+++ b/perl/Amanda/Changer/rait.pm
@@ -268,6 +268,7 @@ sub _make_res {
     }
 
     my $combined_res = Amanda::Changer::rait::Reservation->new(
+	$self,
 	$kid_reservations, $rait_device);
     $rait_device->read_label();
 
@@ -676,9 +677,11 @@ sub errmap (&@) {
 
 sub new {
     my $class = shift;
-    my ($child_reservations, $rait_device) = @_;
+    my ($chg, $child_reservations, $rait_device) = @_;
     my $self = Amanda::Changer::Reservation::new($class);
 
+    $self->{'chg'} = $chg;
+
     # note that $child_reservations may contain "ERROR" in place of a reservation
 
     $self->{'child_reservations'} = $child_reservations;

Reply via email to