diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2020-03-23 17:01:41 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-03-23 17:01:41 -0700 |
commit | ce6f40bde2492c6d6f7b33b7098712456c198269 (patch) | |
tree | 51e6d95bd3d5d4f50c680c0fd7ba86bb6fe05472 | |
parent | ba87ebd4ffed0667d0f8600fe54d005e056710b8 (diff) | |
download | p5-Git-Annex-ce6f40bde2492c6d6f7b33b7098712456c198269.tar.gz |
add some parens to avoid perltidy inserting a spurious space
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-rw-r--r-- | lib/App/annex_review_unused.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/App/annex_review_unused.pm b/lib/App/annex_review_unused.pm index 4e6bb47..dd2ed23 100644 --- a/lib/App/annex_review_unused.pm +++ b/lib/App/annex_review_unused.pm @@ -124,7 +124,7 @@ sub main { # before prompting, clear out stdin, to avoid # registered a keypress more than once ReadMode 4; - 1 while defined ReadKey -1; + 1 while defined ReadKey(-1); my @opts = ('y', 'n'); push @opts, 'o' if $contentlocation; |