From f6adbeeb7dd31aed580439d23ce551dd4fc4023c Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 17 Aug 2013 15:07:08 +0100
Subject: success msgs

---
 dgit | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/dgit b/dgit
index b633c10..a2f3eae 100755
--- a/dgit
+++ b/dgit
@@ -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 {
-- 
cgit v1.2.3