t-setup-import examplegit
t-tstunt-parsechangelog
+t-git-config dgit.default.distro foreign
+t-git-config dgit-distro.foreign.cmd-git false
+
prep () {
dscf=$tmp/mirror/pool/main/example_$v.dsc
}
check () {
- rm -rf $p.cloned
+ pd=$p.$suite
t-refs-same-start
t-archive-none $p
t-archive-query $suite
- t-dgit clone $p $suite $p.cloned
- cd $p.cloned
+ t-dgit clone $p $suite $pd
+ cd $pd
t-ref-head
$1
+ local distro=''
t-dgit import-dsc $dscf +imported
t-ref-same refs/heads/imported
cd ..
reset () {
cd ..
- rm -rf $p.cloned
- mkdir $p.cloned
- cd $p.cloned
+ rm -rf $pd
+ mkdir $pd
+ cd $pd
git init
}
perl -i~ -pe 's/^(Dgit: \w+ \S+ \S+) (.*)/$1\n $2 EXTRA/' $dscf
-check
+check reset
: ---------- older ----------
perl -i -pe 's/^(Dgit: \w+).*/$1/' $dscf
-t-git-config dgit.default.old-dsc-distro test-dummy
-
check
+: ---------- expect fail ----------
+
+pd=$p.fail
+
+t-git-config dgit.default.old-dsc-distro downstream
+
+t-expect-fail 'no configured url and .dsc provides no hint' \
+t-dgit clone $p $suite $pd
+
+
t-ok