Add --no-result option to suppress printing informational messages

24 files changed, 77 insertions, 67 deletions

diff --git a/bpkg/cfg-create.cxx b/bpkg/cfg-create.cxx
index 70d8848..8fd3a05 100644
--- a/bpkg/cfg-create.cxx
+++ b/bpkg/cfg-create.cxx
@@ -102,7 +102,7 @@ namespace bpkg
     db.persist (repository (repository_location ()));
     t.commit ();
 
-    if (verb)
+    if (verb && !o.no_result ())
     {
       c.complete ().normalize ();
       text << "created new configuration in " << c;
diff --git a/bpkg/common.cli b/bpkg/common.cli
index 5c3de83..89bebb5 100644
--- a/bpkg/common.cli
+++ b/bpkg/common.cli
@@ -81,6 +81,15 @@ namespace bpkg
        \li|Even more detailed information.||"
     }
 
+    // In the future we may also have --structured-result, similar to the
+    // build system.
+    //
+    bool --no-result
+    {
+      "Don't print informational messages about the outcome of performing
+       a command."
+    }
+
     path --build
     {
       "<path>",
diff --git a/bpkg/fetch-git.cxx b/bpkg/fetch-git.cxx
index 17c56c5..833c3a7 100644
--- a/bpkg/fetch-git.cxx
+++ b/bpkg/fetch-git.cxx
@@ -665,8 +665,11 @@ namespace bpkg
       // This makes it hard to understand which superproject/submodule is
       // currently being fetched. Let's fix that.
       //
+      // Note that we have "fixed" that capital letter nonsense (hoping that
+      // git-clone will do the same at some point).
+      //
       if (verb != 0)
-        text << "Fetching in '" << dir.posix_string () << "'...";
+        text << "fetching in '" << dir.posix_string () << "'...";
 
       // Note that we suppress the (too detailed) fetch command output if the
       // verbosity level is 1. However, we still want to see the progress in
@@ -878,10 +881,10 @@ namespace bpkg
         update_tree (co, fsdir, psdir, ref, cap, shallow, to);
 
         // Not quite a checkout, but let's make the message match the
-        // git-submodule script output.
+        // git-submodule script output (again, except for capitalization).
         //
         if (verb > 0)
-          text << "Submodule path '" << psd << "': checked out '" << commit
+          text << "submodule path '" << psd << "': checked out '" << commit
                << "'";
 
         // Recurse.
diff --git a/bpkg/pkg-build.cxx b/bpkg/pkg-build.cxx
index 28105d4..5b91ec3 100644
--- a/bpkg/pkg-build.cxx
+++ b/bpkg/pkg-build.cxx
@@ -1964,7 +1964,7 @@ namespace bpkg
       assert (sp->state == package_state::unpacked ||
               sp->state == package_state::transient);
 
-      if (verb)
+      if (verb && !o.no_result ())
         text << (sp->state == package_state::transient
                  ? "purged "
                  : "disfigured ") << *sp;
@@ -2011,7 +2011,7 @@ namespace bpkg
             transaction t (db.begin ());
             pkg_purge (c, t, sp); // Commits the transaction.
 
-            if (verb)
+            if (verb && !o.no_result ())
               text << "purged " << *sp;
 
             if (!p.hold_package)
@@ -2117,7 +2117,7 @@ namespace bpkg
             assert (sp->state == package_state::fetched ||
                     sp->state == package_state::unpacked);
 
-            if (verb)
+            if (verb && !o.no_result ())
             {
               const repository_location& rl (sp->repository);
 
@@ -2163,7 +2163,7 @@ namespace bpkg
             transaction t (db.begin ());
             sp = pkg_unpack (o, c, t, ap->id.name); // Commits the transaction.
 
-            if (verb)
+            if (verb && !o.no_result ())
               text << "unpacked " << *sp;
           }
           else
@@ -2179,7 +2179,7 @@ namespace bpkg
                              true,   // Replace.
                              false); // Don't purge; commits the transaction.
 
-            if (verb)
+            if (verb && !o.no_result ())
               text << "using " << *sp << " (external)";
           }
 
@@ -2213,7 +2213,7 @@ namespace bpkg
 
       assert (sp->state == package_state::configured);
 
-      if (verb)
+      if (verb && !o.no_result ())
         text << "configured " << *sp;
     }
 
@@ -2254,10 +2254,10 @@ namespace bpkg
         if (verb > 1)
         {
           if (hp)
-            text << "hold package " << sp->name;
+            text << "holding package " << sp->name;
 
           if (hv)
-            text << "hold version " << *sp;
+            text << "holding version " << *sp;
         }
       }
     }
@@ -2312,7 +2312,7 @@ namespace bpkg
 
     pkg_update (c, o, o.for_ (), strings (), upkgs);
 
-    if (verb)
+    if (verb && !o.no_result ())
     {
       for (const pkg_command_vars& pv: upkgs)
         text << "updated " << *pv.pkg;
diff --git a/bpkg/pkg-checkout.cxx b/bpkg/pkg-checkout.cxx
index f068b54..14f84cb 100644
--- a/bpkg/pkg-checkout.cxx
+++ b/bpkg/pkg-checkout.cxx
@@ -236,7 +236,7 @@ namespace bpkg
     //
     p = pkg_checkout (o, c, t, move (n), move (v), o.replace ());
 
-    if (verb)
+    if (verb && !o.no_result ())
       text << "checked out " << *p;
 
     return 0;
diff --git a/bpkg/pkg-command.cxx b/bpkg/pkg-command.cxx
index 0f54b95..f287886 100644
--- a/bpkg/pkg-command.cxx
+++ b/bpkg/pkg-command.cxx
@@ -154,7 +154,7 @@ namespace bpkg
 
     pkg_command (cmd, c, o, cmd_v, cvars, ps);
 
-    if (verb)
+    if (verb && !o.no_result ())
     {
       for (const pkg_command_vars& pv: ps)
         text << cmd << (cmd.back () != 'e' ? "ed " : "d ") << *pv.pkg;
diff --git a/bpkg/pkg-configure.cxx b/bpkg/pkg-configure.cxx
index 19b64d9..2bb1b20 100644
--- a/bpkg/pkg-configure.cxx
+++ b/bpkg/pkg-configure.cxx
@@ -301,7 +301,7 @@ namespace bpkg
       pkg_configure (c, o, t, p, vars);
     }
 
-    if (verb)
+    if (verb && !o.no_result ())
       text << "configured " << *p;
 
     return 0;
diff --git a/bpkg/pkg-disfigure.cxx b/bpkg/pkg-disfigure.cxx
index 9153a6a..4dcecaa 100644
--- a/bpkg/pkg-disfigure.cxx
+++ b/bpkg/pkg-disfigure.cxx
@@ -188,7 +188,7 @@ namespace bpkg
     assert (p->state == package_state::unpacked ||
             p->state == package_state::transient);
 
-    if (verb)
+    if (verb && !o.no_result ())
       text << (p->state == package_state::transient
                ? "purged "
                : "disfigured ") << *p;
diff --git a/bpkg/pkg-drop.cxx b/bpkg/pkg-drop.cxx
index 6e28c37..a238803 100644
--- a/bpkg/pkg-drop.cxx
+++ b/bpkg/pkg-drop.cxx
@@ -362,7 +362,7 @@ namespace bpkg
       assert (p->state == package_state::unpacked ||
               p->state == package_state::transient);
 
-      if (verb)
+      if (verb && !o.no_result ())
         text << (p->state == package_state::transient
                  ? "purged "
                  : "disfigured ") << p->name;
@@ -391,7 +391,7 @@ namespace bpkg
       transaction t (db.begin ());
       pkg_purge (c, t, p); // Commits the transaction, p is now transient.
 
-      if (verb)
+      if (verb && !o.no_result ())
         text << "purged " << p->name;
     }
 
diff --git a/bpkg/pkg-fetch.cxx b/bpkg/pkg-fetch.cxx
index ff04411..664c92f 100644
--- a/bpkg/pkg-fetch.cxx
+++ b/bpkg/pkg-fetch.cxx
@@ -296,7 +296,7 @@ namespace bpkg
       p = pkg_fetch (o, c, t, move (n), move (v), o.replace ());
     }
 
-    if (verb)
+    if (verb && !o.no_result ())
     {
       if (!o.existing ())
         text << "fetched " << *p;
diff --git a/bpkg/pkg-purge.cxx b/bpkg/pkg-purge.cxx
index 7b58461..fa5ce01 100644
--- a/bpkg/pkg-purge.cxx
+++ b/bpkg/pkg-purge.cxx
@@ -202,8 +202,8 @@ namespace bpkg
       p->state = package_state::transient;
     }
 
-    if (verb)
-        text << (o.keep () ? "keeping archive " : "purged ") << *p;
+    if (verb && !o.no_result ())
+      text << (o.keep () ? "keeping archive " : "purged ") << *p;
 
     return 0;
   }
diff --git a/bpkg/pkg-unpack.cxx b/bpkg/pkg-unpack.cxx
index 7472194..d9d54ea 100644
--- a/bpkg/pkg-unpack.cxx
+++ b/bpkg/pkg-unpack.cxx
@@ -447,7 +447,7 @@ namespace bpkg
         : pkg_unpack (c, t, move (n), move (v), o.replace ());
     }
 
-    if (verb)
+    if (verb && !o.no_result ())
     {
       if (!external)
         text << "unpacked " << *p;
diff --git a/bpkg/pkg-verify.cxx b/bpkg/pkg-verify.cxx
index ee3cfe4..bb2f3b8 100644
--- a/bpkg/pkg-verify.cxx
+++ b/bpkg/pkg-verify.cxx
@@ -188,7 +188,7 @@ namespace bpkg
       package_manifest m (
         pkg_verify (o, a, o.ignore_unknown (), !o.silent ()));
 
-      if (verb && !o.silent ())
+      if (verb && !o.silent () && !o.no_result ())
         text << "valid package " << m.name << " " << m.version;
 
       return 0;
diff --git a/bpkg/rep-add.cxx b/bpkg/rep-add.cxx
index 6db2c92..704da68 100644
--- a/bpkg/rep-add.cxx
+++ b/bpkg/rep-add.cxx
@@ -16,7 +16,9 @@ using namespace butl;
 namespace bpkg
 {
   shared_ptr<repository>
-  rep_add (transaction& t, const repository_location& rl)
+  rep_add (const common_options& o,
+           transaction& t,
+           const repository_location& rl)
   {
     const string& rn (rl.canonical_name ());
 
@@ -46,7 +48,7 @@ namespace bpkg
     if (added)
       db.update (root);
 
-    if (verb)
+    if (verb && !o.no_result ())
       text << (added ? "added " : updated ? "updated " : "unchanged ") << rn;
 
     return r;
@@ -76,7 +78,7 @@ namespace bpkg
                         ? optional<repository_type> (o.type ())
                         : nullopt));
 
-      rep_add (t, rl);
+      rep_add (o, t, rl);
     }
 
     t.commit ();
diff --git a/bpkg/rep-add.hxx b/bpkg/rep-add.hxx
index 226f0e2..484d6a8 100644
--- a/bpkg/rep-add.hxx
+++ b/bpkg/rep-add.hxx
@@ -23,7 +23,7 @@ namespace bpkg
   // repository if it is not already.
   //
   shared_ptr<repository>
-  rep_add (transaction&, const repository_location&);
+  rep_add (const common_options&, transaction&, const repository_location&);
 }
 
 #endif // BPKG_REP_ADD_HXX
diff --git a/bpkg/rep-create.cxx b/bpkg/rep-create.cxx
index 56f2f87..ba2eb73 100644
--- a/bpkg/rep-create.cxx
+++ b/bpkg/rep-create.cxx
@@ -202,8 +202,8 @@ namespace bpkg
     {
       package_manifest& m (p.second.manifest);
 
-      if (verb)
-        text << "adding " << m.name << " " << m.version;
+      if (verb && !o.no_result ())
+        text << "added " << m.name << " " << m.version;
 
       manifests.emplace_back (move (m));
     }
@@ -267,7 +267,7 @@ namespace bpkg
       fail << "unable to write to " << p << ": " << e;
     }
 
-    if (verb)
+    if (verb && !o.no_result ())
     {
       d.complete ();
       d.normalize ();
diff --git a/bpkg/rep-fetch.cxx b/bpkg/rep-fetch.cxx
index b443118..00454f9 100644
--- a/bpkg/rep-fetch.cxx
+++ b/bpkg/rep-fetch.cxx
@@ -794,7 +794,7 @@ namespace bpkg
         warn << "repository state is now broken and will be cleaned up" <<
           info << "run 'bpkg rep-fetch' to update";
 
-        rep_remove_clean (conf, t.database ());
+        rep_remove_clean (o, conf, t.database ());
       }
 
       throw;
@@ -827,7 +827,7 @@ namespace bpkg
       // same location.
       //
       if (ua.find (r) == ua.end () || r.load ()->location.url () != rl.url ())
-        rep_add (t, rl);
+        rep_add (o, t, rl);
 
       repos.emplace_back (r);
     }
@@ -903,7 +903,7 @@ namespace bpkg
           //
           auto i (ua.find (r));
           if (i == ua.end () || i->load ()->location.url () != rl.url ())
-            r = lazy_shared_ptr<repository> (db, rep_add (t, rl));
+            r = lazy_shared_ptr<repository> (db, rep_add (o, t, rl));
         }
 
         repos.emplace_back (move (r));
@@ -927,7 +927,7 @@ namespace bpkg
 
     t.commit ();
 
-    if (verb)
+    if (verb && !o.no_result ())
       text << pcount << " package(s) in " << rcount << " repository(s)";
 
     return 0;
diff --git a/bpkg/rep-remove.cxx b/bpkg/rep-remove.cxx
index eadb63f..53a7de1 100644
--- a/bpkg/rep-remove.cxx
+++ b/bpkg/rep-remove.cxx
@@ -182,7 +182,8 @@ namespace bpkg
   }
 
   void
-  rep_remove_clean (const dir_path& c,
+  rep_remove_clean (const common_options& o,
+                    const dir_path& c,
                     database& db,
                     bool quiet)
   {
@@ -216,7 +217,7 @@ namespace bpkg
           r->prerequisites.clear ();
           db.update (r);
 
-          if (verb >= (quiet ? 2 : 1))
+          if (verb >= (quiet ? 2 : 1) && !o.no_result ())
             text << "cleaned " << r->name;
         }
         else
@@ -285,7 +286,7 @@ namespace bpkg
     //
     if (o.clean ())
     {
-      rep_remove_clean (c, db, false /* quiet */);
+      rep_remove_clean (o, c, db, false /* quiet */);
       return 0;
     }
 
@@ -383,7 +384,7 @@ namespace bpkg
     {
       rep_remove (c, t, r.load ());
 
-      if (verb)
+      if (verb && !o.no_result ())
         text << "removed " << r.object_id ();
     }
 
diff --git a/bpkg/rep-remove.hxx b/bpkg/rep-remove.hxx
index a8d4908..68d8a36 100644
--- a/bpkg/rep-remove.hxx
+++ b/bpkg/rep-remove.hxx
@@ -40,7 +40,10 @@ namespace bpkg
   // - Remove all available packages.
   //
   void
-  rep_remove_clean (const dir_path& conf, database&, bool quiet = true);
+  rep_remove_clean (const common_options&,
+                    const dir_path& conf,
+                    database&,
+                    bool quiet = true);
 
   // Remove a repository from locations of the available packages it
   // contains. Remove packages that come from only this repository.
diff --git a/tests/rep-auth.test b/tests/rep-auth.test
index 987a3fe..addaad3 100644
--- a/tests/rep-auth.test
+++ b/tests/rep-auth.test
@@ -611,7 +611,7 @@ sc = " " # Space character to append to here-document line when required.
       echo '\'                                >+rep/repositories.manifest;
 
       $rep_create --key $key rep &rep/packages.manifest 2>>/EOE != 0
-        adding foo 1
+        added foo 1
         error: invalid certificate for rep/: no email
         EOE
     }
@@ -626,7 +626,7 @@ sc = " " # Space character to append to here-document line when required.
       echo '\'                                >+rep/repositories.manifest;
 
       $rep_create --key $key rep &rep/packages.manifest 2>>/EOE != 0
-        adding foo 1
+        added foo 1
         error: certificate for repository rep/ has expired
         EOE
     }
diff --git a/tests/rep-create.test b/tests/rep-create.test
index 05aca20..7967181 100644
--- a/tests/rep-create.test
+++ b/tests/rep-create.test
@@ -28,7 +28,7 @@
     $clone_rep;
 
     $* 1/stable/ 2>>/~%EOE% &1/stable/packages.manifest;
-      adding foo 1
+      added foo 1
       %1 package\(s\) in .+/stable/%
       EOE
 
@@ -51,7 +51,7 @@
     $clone_rep;
 
     $* --key $key 1/stable/ 2>>/~%EOE% &1/stable/packages.manifest;
-      adding foo 1
+      added foo 1
       warning: --key option ignored
         info: repository manifest contains no certificate
         info: run 'bpkg help rep-create' for more information
@@ -96,7 +96,7 @@
 
     $* --key $key 1/stable/ 2>>/~%EOE% &1/stable/packages.manifest \
                                        &1/stable/signature.manifest;
-      adding foo 1
+      added foo 1
       %1 package\(s\) in .+/stable/%
       EOE
 
@@ -118,7 +118,7 @@
   :
   $clone_rep;
   $* 1/stable/ 2>>EOE &1/stable/packages.manifest != 0
-    adding foo 1
+    added foo 1
     error: --key option required
       info: repository manifest contains a certificate
       info: run 'bpkg help rep-create' for more information
@@ -144,7 +144,7 @@
   :
   $clone_rep;
   $* --ignore-unknown testing/ 2>>/~%EOE% &testing/packages.manifest
-    adding foo 2
+    added foo 2
     %1 package\(s\) in .+/testing/%
     EOE
 }
diff --git a/tests/rep-fetch-git-branch.test b/tests/rep-fetch-git-branch.test
index dfc9633..6e23e20 100644
--- a/tests/rep-fetch-git-branch.test
+++ b/tests/rep-fetch-git-branch.test
@@ -34,7 +34,7 @@ warning: fetching over dumb HTTP, no progress will be shown'
     warn1 = '%.{0}'
     warn2 = '%.{0}'
     warn3 = '%.{0}'
-    fetch = "%Fetching in '.+style/basic'.+%"
+    fetch = "%fetching in '.+style/basic'.+%"
     warn4 = '%.{0}'
   end;
 
@@ -46,15 +46,15 @@ warning: fetching over dumb HTTP, no progress will be shown'
     %Submodule 'libbar' .+ registered for path 'libbar'%
     $warn2
     %Cloning into '.+doc/style'.+%
-    %Submodule path 'doc/style': checked out .+%
+    %submodule path 'doc/style': checked out .+%
     %Submodule 'basic' .+ registered for path 'doc/style/basic'%
     $warn3
     %Cloning into '.+doc/style/basic'.+%
     $fetch
-    %Submodule path 'doc/style/basic': checked out .+%
+    %submodule path 'doc/style/basic': checked out .+%
     $warn4
     %Cloning into '.+libbar'.+%
-    %Submodule path 'libbar': checked out .+%
+    %submodule path 'libbar': checked out .+%
     1 package\(s\) in 1 repository\(s\)
     EOE
 }
@@ -81,7 +81,7 @@ warning: fetching over dumb HTTP, no progress will be shown'
     $* 2>>~"%EOE%"
       %fetching git:.+libfoo#$branch%
       $warn
-      %Fetching in '.+$branch'.+%
+      %fetching in '.+$branch'.+%
       1 package\(s\) in 1 repository\(s\)
       EOE
   }
@@ -134,15 +134,15 @@ warning: fetching over dumb HTTP, no progress will be shown'
     $* 2>>~"%EOE%" 1>&2;
       %fetching git:.+libfoo#$branch%
       $warn1
-      %Fetching in '.+$branch'.+%
+      %fetching in '.+$branch'.+%
       %warning: unable to rmdir '?libbar'?:.+%
       %Submodule 'libbaz' .+ registered for path 'libbaz'%
       $warn2
-      %Fetching in '.+doc/style'.+%
-      %Submodule path 'doc/style': checked out .+%
+      %fetching in '.+doc/style'.+%
+      %submodule path 'doc/style': checked out .+%
       $warn3
       %Cloning into '.+libbaz'.+%
-      %Submodule path 'libbaz': checked out .+%
+      %submodule path 'libbaz': checked out .+%
       1 package\(s\) in 1 repository\(s\)
       EOE
 
diff --git a/tests/rep-fetch-git-commit.test b/tests/rep-fetch-git-commit.test
index ba05de5..3169904 100644
--- a/tests/rep-fetch-git-commit.test
+++ b/tests/rep-fetch-git-commit.test
@@ -27,7 +27,7 @@ warning: fetching over dumb HTTP, no progress will be shown'
 
     if ($git_protocol == 'https-smart-unadv')
       warn  = '%.{0}'
-      fetch = "%Fetching in '.+$abbr_commit'.+%"
+      fetch = "%fetching in '.+$abbr_commit'.+%"
     else
       warn  = "warning: fetching whole repository history"
 
@@ -56,7 +56,7 @@ warning: fetching over dumb HTTP, no progress will be shown'
 
     if ($git_protocol == 'https-smart-unadv')
       warn  = '%.{0}'
-      fetch = "%Fetching in '.+$abbr_commit'.+%"
+      fetch = "%fetching in '.+$abbr_commit'.+%"
     else
       warn  = "warning: fetching whole branch history"
 
@@ -95,7 +95,7 @@ warning: fetching over dumb HTTP, no progress will be shown'
       fetch = '%.{0}'
     else
       warn  = '%.{0}'
-      fetch = "%Fetching in '.+$abbr_commit'.+%"
+      fetch = "%fetching in '.+$abbr_commit'.+%"
     end;
 
     $* 2>>~"%EOE%"
diff --git a/tests/rep-fetch.test b/tests/rep-fetch.test
index 2339b91..1ee0d4b 100644
--- a/tests/rep-fetch.test
+++ b/tests/rep-fetch.test
@@ -192,7 +192,6 @@ $* 2>>/EOE != 0
 
     $* --trust-yes $rep/bar/unstable 2>>EOE;
       added pkg:build2.org/rep-fetch/bar/unstable
-      fetching pkg:build2.org/rep-fetch/bar/unstable
       fetching pkg:build2.org/rep-fetch/bar/testing (complements pkg:build2.org/rep-fetch/bar/unstable)
       fetching pkg:build2.org/rep-fetch/bar/stable (complements pkg:build2.org/rep-fetch/bar/testing)
       fetching pkg:build2.org/rep-fetch/foo/stable (prerequisite of pkg:build2.org/rep-fetch/bar/stable)
@@ -201,7 +200,6 @@ $* 2>>/EOE != 0
       EOE
 
     $* 'pkg:build2.org/rep-fetch/bar/unstable' 2>>EOE;
-      fetching pkg:build2.org/rep-fetch/bar/unstable
       fetching pkg:build2.org/rep-fetch/bar/testing (complements pkg:build2.org/rep-fetch/bar/unstable)
       fetching pkg:build2.org/rep-fetch/bar/stable (complements pkg:build2.org/rep-fetch/bar/testing)
       fetching pkg:build2.org/rep-fetch/foo/stable (prerequisite of pkg:build2.org/rep-fetch/bar/stable)
@@ -228,7 +226,6 @@ $* 2>>/EOE != 0
 
     $* --trust-yes $rep/cycle/stable 2>>EOE;
       added pkg:build2.org/rep-fetch/cycle/stable
-      fetching pkg:build2.org/rep-fetch/cycle/stable
       fetching pkg:build2.org/rep-fetch/cycle/math (prerequisite of pkg:build2.org/rep-fetch/cycle/stable)
       fetching pkg:build2.org/rep-fetch/cycle/extra (prerequisite of pkg:build2.org/rep-fetch/cycle/math)
       3 package(s) in 3 repository(s)
@@ -269,7 +266,6 @@ $* 2>>/EOE != 0
 
       $* --trust-yes $rep/cycle/stable 2>>EOE;
         added pkg:build2.org/rep-fetch/cycle/stable
-        fetching pkg:build2.org/rep-fetch/cycle/stable
         fetching pkg:build2.org/rep-fetch/cycle/math (prerequisite of pkg:build2.org/rep-fetch/cycle/stable)
         fetching pkg:build2.org/rep-fetch/cycle/extra (prerequisite of pkg:build2.org/rep-fetch/cycle/math)
         3 package(s) in 3 repository(s)
@@ -277,7 +273,6 @@ $* 2>>/EOE != 0
 
       $* --trust-yes $stable_rep 2>>EOE;
         updated pkg:build2.org/rep-fetch/cycle/stable
-        fetching pkg:build2.org/rep-fetch/cycle/stable
         fetching pkg:build2.org/rep-fetch/cycle/extra (prerequisite of pkg:build2.org/rep-fetch/cycle/stable)
         2 package(s) in 2 repository(s)
         EOE
@@ -295,7 +290,6 @@ $* 2>>/EOE != 0
 
       $* --trust-yes $rep/cycle/stable 2>>EOE;
         added pkg:build2.org/rep-fetch/cycle/stable
-        fetching pkg:build2.org/rep-fetch/cycle/stable
         fetching pkg:build2.org/rep-fetch/cycle/math (prerequisite of pkg:build2.org/rep-fetch/cycle/stable)
         fetching pkg:build2.org/rep-fetch/cycle/extra (prerequisite of pkg:build2.org/rep-fetch/cycle/math)
         3 package(s) in 3 repository(s)
@@ -359,7 +353,6 @@ if ($remote != true)
     $* 2>!;
 
     $* "dir:($rep/libbar.git)" 2>>"EOE";
-      fetching dir:($rep/libbar.git)
       fetching dir:($rep/style-basic.git) \(prerequisite of dir:($rep/libbar.git)\)
       3 package\(s\) in 2 repository\(s\)
       EOE
@@ -382,7 +375,6 @@ if ($remote != true)
       $* 2>!;
 
       $* --shallow "dir:($rep/libbar.git)" 2>>"EOE";
-        fetching dir:($rep/libbar.git)
         3 package\(s\) in 2 repository\(s\)
         EOE