X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=perl%2FAmanda%2FDevice.pm;h=cdd0af6e1310df5d8201aa8d7b57595b8dd6c95e;hb=refs%2Ftags%2Fupstream%2F3.3.1;hp=17caeecae27b77e7c1ed92cc8564ed8cf17781f5;hpb=cd0b924f27312d57bd42f6c4fae2b795139e2d0b;p=debian%2Famanda

diff --git a/perl/Amanda/Device.pm b/perl/Amanda/Device.pm
index 17caeec..cdd0af6 100644
--- a/perl/Amanda/Device.pm
+++ b/perl/Amanda/Device.pm
@@ -1,5 +1,5 @@
 # This file was automatically generated by SWIG (http://www.swig.org).
-# Version 1.3.39
+# Version 2.0.4
 #
 # Do not make changes to this file unless you know what you are doing--modify
 # the SWIG interface file instead.
@@ -158,6 +158,7 @@ sub DESTROY {
 *min_block_size = *Amanda::Devicec::Device_min_block_size;
 *max_block_size = *Amanda::Devicec::Device_max_block_size;
 *block_size = *Amanda::Devicec::Device_block_size;
+*header_block_size = *Amanda::Devicec::Device_header_block_size;
 *volume_header = *Amanda::Devicec::Device_volume_header;
 sub DISOWN {
     my $self = shift;