summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2019-08-17 21:02:16 +0100
committerSean Whitton <spwhitton@spwhitton.name>2019-08-17 21:08:55 +0100
commit034245c565101c55e654bd1c451b9e97d80aae28 (patch)
tree7ad23ca24d17529188da4aa92f0f56441b7bc577 /lib
parent2f4ef59b9b7f1868d54fa51055d4f3a8b80065fc (diff)
downloaddotfiles-034245c565101c55e654bd1c451b9e97d80aae28.tar.gz
pause when couldn't check for unpushed tags
Might prompt user to set a git config option remote.foo.unpushed-tags-ignore or unpushed-tags.ignore.
Diffstat (limited to 'lib')
-rw-r--r--lib/perl5/Local/MrRepo/Repo/Git.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/perl5/Local/MrRepo/Repo/Git.pm b/lib/perl5/Local/MrRepo/Repo/Git.pm
index 23736a24..6056f4e8 100644
--- a/lib/perl5/Local/MrRepo/Repo/Git.pm
+++ b/lib/perl5/Local/MrRepo/Repo/Git.pm
@@ -24,6 +24,7 @@ use parent 'Local::MrRepo::Repo';
use Exporter 'import';
use Git::Wrapper;
use Local::ScriptStatus;
+use Local::Interactive qw(get_ack);
use Local::Util::Git qw(unpushed_tags);
use Try::Tiny;
@@ -122,7 +123,8 @@ sub review {
eval { @unpushed_tags = unpushed_tags($self->toplevel) };
if (my $exception = $@) {
die $exception unless $exception =~ /failed to list git remote/;
- say_spaced_bullet("Warning: could not check for unpushed tags: $@");
+ say_bullet("Warning: could not check for unpushed tags: $exception");
+ get_ack();
}
unless (@unpushed_tags == 0) {
say_bold("There are tags not pushed to any remote:");