On Sat, 2013-02-09 at 15:18:13 +0100, Bernhard R. Link wrote:
> diff --git a/scripts/Dpkg/Source/Package/V3/native.pm
> b/scripts/Dpkg/Source/Package/V3/native.pm
> index ba6539a..32e3c1b 100644
> --- a/scripts/Dpkg/Source/Package/V3/native.pm
> +++ b/scripts/Dpkg/Source/Package/V3/native.pm
> @@ -64,7 +64,9 @@ sub do_extract {
> }
>
> sub can_build {
> - return 1;
> + my ($self, $dir) = @_;
> + my $v = Dpkg::Version->new($self->{'fields'}->{'Version'});
> + return (!!$v->is_native(), _g("native package version may not have a
> revision"));
I've changed this to not return a string when returning true.
And added two missing use Dpkg::Version to the format modules.
Thanks,
Guillem
--
To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org
