dgit: Dgit parsing: Move @ourdscfield loop into parse_dsc_field

[dgit.git] / tests / lib

diff --git a/tests/lib b/tests/lib
index 993ec36b647a44953d1a67d59cb536b7ca5a8969..a4932d335cd36109a440c46ad9156a812d436616 100644 (file)
--- a/tests/lib
+++ b/tests/lib
@@ -406,7 +406,8 @@ t-dgit () {
        : '
 {{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{'
        $dgit --dgit=$dgit --dget:-u --dput:--config=$tmp/dput.cf \
-               -dtest-dummy $DGIT_TEST_OPTS $DGIT_TEST_DEBUG \
+               ${distro--dtest-dummy} ${distro+${distro:+-d}${distro}} \
+               $DGIT_TEST_OPTS $DGIT_TEST_DEBUG \
                -k39B13D8A $t_dgit_xopts "$@"
        : '}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
 '
@@ -851,7 +852,11 @@ t-incoming-dsc () {
 t-ref-dsc-dgit () {
        t-incoming-dsc
        local val; val=`t-822-field $incoming_dsc Dgit`
-       perl -e '$_=shift @ARGV; die "Dgit $_ ?" unless m/^\w+\b/;' "$val"
+       val=$( perl -e '
+               $_=shift @ARGV;
+               die "Dgit $_ ?" unless m/^\w+\b/;
+               print $&,"\n" or die $!;
+       ' "$val")
        t-ref-same-val $incoming_dsc "$val"
 }