summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2020-02-24 07:32:13 -0700
committerSean Whitton <spwhitton@spwhitton.name>2020-02-24 07:32:13 -0700
commit00054c7dde9d7e712a7e0a7d2a82569a73b59589 (patch)
treec72808d2aa31372b28d0242d01bd1dff4c711929
parentb76177b6c8bfa9b9a1e1e19c5d4446602c19c1a2 (diff)
downloadp5-Git-Annex-00054c7dde9d7e712a7e0a7d2a82569a73b59589.tar.gz
annex-review-unused: 'b' should go back one entry not two
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-rw-r--r--Changes1
-rw-r--r--lib/App/annex_review_unused.pm1
2 files changed, 1 insertions, 1 deletions
diff --git a/Changes b/Changes
index 82e2e9c..2f5fc85 100644
--- a/Changes
+++ b/Changes
@@ -2,6 +2,7 @@ Revision history for Git::Annex
{{$NEXT}}
- Fix logic in an example in Git::Annex::BatchCommand SYNOPSIS.
+ - annex-review-unused: 'b' should go back one entry not two.
0.001 2020-02-12 12:33:47-07:00 America/Phoenix
- First public release.
diff --git a/lib/App/annex_review_unused.pm b/lib/App/annex_review_unused.pm
index a1f9476..22e7a56 100644
--- a/lib/App/annex_review_unused.pm
+++ b/lib/App/annex_review_unused.pm
@@ -150,7 +150,6 @@ sub main {
system "xdg-open", $contentlocation;
} elsif ($response eq "b" and $i > 0) {
$i--;
- $i--;
pop @to_drop
if @to_drop
and $to_drop[$#to_drop] eq