about summary refs log tree commit homepage
path: root/script
diff options
context:
space:
mode:
authorEric Wong (Contractor, The Linux Foundation) <e@80x24.org>2019-06-10 16:58:55 +0000
committerEric Wong (Contractor, The Linux Foundation) <e@80x24.org>2019-06-10 17:53:08 +0000
commit6e507c8cb41b0d48963503a88034348d74506211 (patch)
tree396c754ab7983c06be1bb966304d91e8bfdcd389 /script
parent45890d532f0ea68f5879b036b22d9dbd4e19754c (diff)
downloadpublic-inbox-6e507c8cb41b0d48963503a88034348d74506211.tar.gz
Fill in undef as "(unchanged)" when displaying commits
and prefix the epoch name.
Diffstat (limited to 'script')
-rwxr-xr-xscript/public-inbox-edit9
-rwxr-xr-xscript/public-inbox-purge7
2 files changed, 3 insertions, 13 deletions
diff --git a/script/public-inbox-edit b/script/public-inbox-edit
index ff0351a3..7a534cc2 100755
--- a/script/public-inbox-edit
+++ b/script/public-inbox-edit
@@ -207,7 +207,7 @@ W: possible message boundary splitting error
 
                 next unless $opt->{verbose};
                 # should we consider this machine-parseable?
-                print "$ibx->{mainrepo}:\n\tNONE\n";
+                PublicInbox::AdminEdit::show_rewrites(\*STDOUT, $ibx, []);
                 next;
         }
 
@@ -223,11 +223,6 @@ W: possible message boundary splitting error
                 }
                 next unless $opt->{verbose};
                 # should we consider this machine-parseable?
-                print "$ibx->{mainrepo}:";
-                if (scalar @$commits) {
-                        print join("\n\t", '', @$commits), "\n";
-                } else {
-                        print "\tNONE\n";
-                }
+                PublicInbox::AdminEdit::show_rewrites(\*STDOUT, $ibx, $commits);
         }
 }
diff --git a/script/public-inbox-purge b/script/public-inbox-purge
index 846557ca..0705d170 100755
--- a/script/public-inbox-purge
+++ b/script/public-inbox-purge
@@ -45,12 +45,7 @@ foreach my $ibx (@ibxs) {
         $v2w->done;
 
         if ($opt->{verbose}) { # should we consider this machine-parseable?
-                print "$ibx->{mainrepo}:";
-                if (scalar @$commits) {
-                        print join("\n\t", '', @$commits), "\n";
-                } else {
-                        print " NONE\n";
-                }
+                PublicInbox::AdminEdit::show_rewrites(\*STDOUT, $ibx, $commits);
         }
         $n_purged += scalar @$commits;
 }