This patch worked for me, too.
On Thu, Mar 08, 2012 at 10:13:30AM -0700, Steven Backus wrote:
> My problem is fixed. Jean-Louis provided a patch, it didn't work
> at first and then he said:
>
> > You do not have the correct version of swig installed. Do not
> > patch Header.swg, it require swig, but you can manually apply the
> > patch to Header.pm
>
> Here's what I did:
>
> 1. Install swig-1.3.40.
>
> 2. Apply this patch, but not to Header.swg, to Header.pm
>
> diff --git a/perl/Amanda/Header.swg b/perl/Amanda/Header.swg
> index a7d391b..28cb4e8 100644
> --- a/perl/Amanda/Header.swg
> +++ b/perl/Amanda/Header.swg
> @@ -151,7 +151,11 @@ sub from_string {
> sub get_dle {
> my $self = shift;
>
> - return Amanda::Header::HeaderXML->new($self->{'dle_str'});
> + if ($self->{'dle_str'}) {
> + return Amanda::Header::HeaderXML->new($self->{'dle_str'});
> + } else {
> + return undef;
> + }
> }
>
> Steve
Jose Calhariz
--
--
O homem superior não se dedica a favor ou contra nada. Segue
o que for correto.
-- Confucio
signature.asc
Description: Digital signature
