diff options
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -524,7 +524,7 @@ sub clone ($) { } fetch_from_archive() or die; runcmd @git, qw(reset --hard), lrref(); - print "ready for work in $dstdir\n"; + print "dgit ok: ready for work in $dstdir\n"; } sub fetch () { @@ -532,12 +532,14 @@ sub fetch () { git_fetch_us(); } fetch_from_archive() or die; + print "dgit ok: fetched into ".lrref()."\n"; } sub pull () { fetch(); runcmd_ordryrun @git, qw(merge -m),"Merge from $suite [dgit]", lrref(); + print "dgit ok: fetched to ".lrref()." and merged into HEAD\n"; } sub dopush () { @@ -593,6 +595,7 @@ sub dopush () { my $host = access_cfg('upload-host'); my @hostarg = defined($host) ? ($host,) : (); runcmd_ordryrun @dput, @hostarg, $changesfile; + print "dgit ok: pushed and uploaded $dsc->{Version}\n"; } sub cmd_clone { |