diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-24 07:36:18 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-24 07:36:18 -0700 |
| commit | cbb60cd7c5f2c4e0a2edf11712648ac77799719a (patch) | |
| tree | 3315470ef4016309bcd153b52278249426b9c29f | |
| parent | eeec619c70d49253b54dc54b2625efa77ccf664a (diff) | |
| parent | 9df5091987677ce9025a83917ca5dc89458ab513 (diff) | |
| download | p5-Git-Annex-cbb60cd7c5f2c4e0a2edf11712648ac77799719a.tar.gz | |
Merge tag 'v0.002' into debian
v0.002
# gpg: Signature made Mon 24 Feb 2020 07:35:56 AM MST
# gpg: using RSA key 9B917007AE030E36E4FC248B695B7AE4BF066240
# gpg: issuer "spwhitton@spwhitton.name"
# gpg: Good signature from "Sean Whitton <spwhitton@spwhitton.name>" [ultimate]
# Primary key fingerprint: 8DC2 487E 51AB DD90 B5C4 753F 0F56 D055 3B6D 411B
# Subkey fingerprint: 9B91 7007 AE03 0E36 E4FC 248B 695B 7AE4 BF06 6240
| -rw-r--r-- | Changes | 4 | ||||
| -rw-r--r-- | dist.ini | 5 | ||||
| -rw-r--r-- | lib/App/annex_review_unused.pm | 1 | ||||
| -rw-r--r-- | lib/Git/Annex/BatchCommand.pm | 2 |
4 files changed, 8 insertions, 4 deletions
@@ -2,5 +2,9 @@ Revision history for Git::Annex {{$NEXT}} +0.002 2020-02-24 07:33:02-07:00 America/Phoenix + - 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. @@ -4,7 +4,7 @@ license = GPL_3 copyright_holder = Sean Whitton <spwhitton@spwhitton.name> copyright_year = 2019-2020 -version = 0.001 +version = 0.002 [PkgVersion] [PodWeaver] @@ -15,7 +15,8 @@ version = 0.001 [PodSyntaxTests] [@Git] -signed = 1 +signed = 1 +signoff = 1 [@Filter] -bundle = @Basic 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 diff --git a/lib/Git/Annex/BatchCommand.pm b/lib/Git/Annex/BatchCommand.pm index 1629bb1..0351f09 100644 --- a/lib/Git/Annex/BatchCommand.pm +++ b/lib/Git/Annex/BatchCommand.pm @@ -24,7 +24,7 @@ package Git::Annex::BatchCommand; # see git-annex-find(1) -- `git annex find --batch --not --in here` # prints an empty string for each file which is not present - say "foo/bar is not present in this repo" if $batch->say("foo/bar"); + say "foo/bar is not present in this repo" unless $batch->ask("foo/bar"); =head1 DESCRIPTION |