diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2019-12-19 20:16:22 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2019-12-19 20:17:02 -0700 |
commit | eb1b3d457e9d6f0abdaf543110a58ac38dec6ad8 (patch) | |
tree | b8c47829d612b4e735d9febf75e43c9409b06528 | |
parent | 13c3ef500f490e4e90e9f0f5b84258e03cd2509a (diff) | |
download | dotfiles-eb1b3d457e9d6f0abdaf543110a58ac38dec6ad8.tar.gz |
readability
-rw-r--r-- | lib/perl5/Local/MrRepo/Repo/Git/Annex.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/perl5/Local/MrRepo/Repo/Git/Annex.pm b/lib/perl5/Local/MrRepo/Repo/Git/Annex.pm index ea468251..495073c6 100644 --- a/lib/perl5/Local/MrRepo/Repo/Git/Annex.pm +++ b/lib/perl5/Local/MrRepo/Repo/Git/Annex.pm @@ -51,7 +51,7 @@ sub review { unless (@annex_find_output == 0) { say_spaced_bullet("Some annex content is present only locally:"); say " $_" for map { ${decode_json($_)}{file} } @annex_find_output; - say ""; + print "\n"; say_bold (" use `git annex sync --content' to fix this (`mr push' should be"); say_bold @@ -87,7 +87,7 @@ sub review_unused { say_spaced_bullet("There are unused files you can drop with" . " `git annex dropunused':"); say " " . $_->{number} . " " . $_->{key} for @unused_files; - say ""; + print "\n"; } my $i = 0; @@ -108,7 +108,7 @@ sub review_unused { splice @log_lines, (($height - 5) - @log_lines) if @log_lines > ($height - 5); } - say ""; + print "\n"; say for @log_lines; if ($opts{interactive}) { my $response; @@ -158,7 +158,7 @@ sub review_unused { } } } - say ""; + print "\n"; $i++; } |