diff -ur dpkg-1.16.0~ubuntu5.orig//scripts/Dpkg/Deps.pm dpkg-1.16.0~ubuntu5/scripts/Dpkg/Deps.pm --- dpkg-1.16.0~ubuntu5.orig//scripts/Dpkg/Deps.pm 2011-03-01 22:07:14.000000000 +0000 +++ dpkg-1.16.0~ubuntu5/scripts/Dpkg/Deps.pm 2011-03-24 03:16:11.473973001 +0000 @@ -526,7 +526,7 @@ ([a-zA-Z0-9][a-zA-Z0-9+.-]*) # package name (?: # start of optional part : # colon for architecture - (any) # architecture name + (any|native) # architecture name )? # end of optional part (?: # start of optional part \s* \( # open parenthesis for version part diff -ur dpkg-1.16.0~ubuntu5.orig//scripts/t/400_Dpkg_Deps.t dpkg-1.16.0~ubuntu5/scripts/t/400_Dpkg_Deps.t --- dpkg-1.16.0~ubuntu5.orig//scripts/t/400_Dpkg_Deps.t 2011-03-01 22:07:14.000000000 +0000 +++ dpkg-1.16.0~ubuntu5/scripts/t/400_Dpkg_Deps.t 2011-03-24 03:10:40.521973001 +0000 @@ -13,7 +13,7 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see . -use Test::More tests => 17; +use Test::More tests => 19; use strict; use warnings; @@ -81,3 +81,8 @@ my $dep_bad_multiline = deps_parse("a, foo\nbar, c"); ok(!defined($dep_bad_multiline), "invalid dependency split over multiple line"); delete $SIG{'__WARN__'}; + +my $dep_multiarch_native = deps_parse("libfoo:native, libbar:native (>= 2.6-1), libfake:native (>= 2.6-1) [arch=armel]"); +my $dep_multiarch_any = deps_parse("libfoo:any, libbar:any (>=2.6-1), libfake:any (>= 2.6-1) [arch=armel]"); +is($dep_multiarch_native->output(), "libfoo, libbar (>= 2.6-1), libfake (>= 2.6-1) [arch=armel]" ,"depends:native syntax"); +is($dep_multiarch_any->output(), "libfoo, libbar (>= 2.6-1), libfake (>= 2.6-1) [arch=armel]" ,"depends:any syntax");