X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bin%2Fwanna-build;h=560a3d98307b1d421e2df33e016de2da9f6a9294;hb=7d67dfb772254f771ef9cb80f98e516cef6e27ef;hp=8065a2ced78debbcd9df4ca0be1c90f5d93cdf5a;hpb=bc36af551cb06ca149f1ef5674efeef802c24b4e;p=wannabuild.git diff --git a/bin/wanna-build b/bin/wanna-build index 8065a2c..560a3d9 100755 --- a/bin/wanna-build +++ b/bin/wanna-build @@ -1561,7 +1561,7 @@ sub build_deplist { sub filterarch { return "" unless $_[0]; - return Dpkg::Deps::parse($_[0], ("reduce_arch" => 1, "host_arch" => $_[1]))->dump(); + return Dpkg::Deps::deps_parse($_[0], ("reduce_arch" => 1, "host_arch" => $_[1]))->output(); } sub wb_edos_builddebcheck { @@ -1608,9 +1608,9 @@ sub wb_edos_builddebcheck { } } - print "calling: edos-debcheck $edosoptions < $sourcesfile ".join('', map {" '-base FILE' ".$_ } @$packagefiles)."\n"; + print "calling: edos-debcheck $edosoptions < $sourcesfile ".join('', map {" -I ".$_ } @$packagefiles)."\n"; open(my $result_cmd, '-|', - "edos-debcheck $edosoptions < $sourcesfile ".join('', map {" '-base FILE' ".$_ } @$packagefiles)); + "edos-debcheck $edosoptions < $sourcesfile ".join('', map {" -I ".$_ } @$packagefiles)); my $explanation=""; my $result={};