diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-05 21:58:16 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-05 22:17:46 -0700 |
commit | 6df85e50c22dee616e9520e75586e5e63b3cc733 (patch) | |
tree | 2abca1ede255a117931318737baa13b076f88d60 /bin | |
parent | 5e49998e520c5078631edb1a8af1495ccf891e29 (diff) | |
download | p5-Git-Annex-6df85e50c22dee616e9520e75586e5e63b3cc733.tar.gz |
annex-review-unused missing subs
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/annex-review-unused | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/bin/annex-review-unused b/bin/annex-review-unused index 68c7aef..4c06307 100755 --- a/bin/annex-review-unused +++ b/bin/annex-review-unused @@ -65,6 +65,7 @@ use Getopt::Long; use Git::Annex; use Try::Tiny; use Term::ReadKey; +use Term::ANSIColor; my $annex = Git::Annex->new; @@ -200,3 +201,9 @@ if (@to_drop) { # after this run. note that in --just-print mode, @to_drop will be # empty, so we'll always exit non-zero if there are any unused files exit(@to_drop != @unused_files); + +sub say_bold { print colored(['bold'], @_), "\n" } + +sub say_bullet { say_bold(" • ", @_) } + +sub say_spaced_bullet { say_bold("\n", " • ", @_, "\n") } |