1 --- amanda-3.3.6/perl/Amanda/Xfer.swg.orig 2015-12-27 11:44:42.539670320 +0100
2 +++ amanda-3.3.6/perl/Amanda/Xfer.swg 2015-12-27 11:47:02.104286963 +0100
7 - # The C function adds the proper blessing -- this function
8 - # just gets $pkg out of the way.
13 %define OVERLOAD_REPR()
15 use overload '""' => sub { $_[0]->repr(); };
16 -# overload comparison, so users can ask if one obj == another
17 use overload '==' => sub { Amanda::Xfer::same_elements($_[0], $_[1]); };
18 use overload '!=' => sub { not Amanda::Xfer::same_elements($_[0], $_[1]); };