Rename annex-review-unused to git-annex-reviewunused

Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>

5 files changed, 13 insertions, 11 deletions

diff --git a/Changes b/Changes
index a7995b0..30f4ec4 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,8 @@
 Revision history for Git::Annex
 
 {{$NEXT}}
+    - Rename annex-review-unused to git-annex-reviewunused now that git-annex
+      supports third party subcommands.
 
 0.006     2020-03-23 17:02:28-07:00 America/Phoenix
     - annex-review-unused: Check whether unused files still exist earlier.
diff --git a/README b/README
index d550c62..b32b1c2 100644
--- a/README
+++ b/README
@@ -8,7 +8,7 @@ Git::Annex -- class representing a git-annex repository
 
 annex-to-annex -- use hardlinks to migrate files between git annex repos
 
-annex-review-unused -- interactively process `git annex unused` output
+git-annex-reviewunused -- interactively process `git annex unused` output
 
 INSTALLATION
 
@@ -28,7 +28,7 @@ After installing, you can find documentation for this module and its
 scripts with the perldoc & man commands.
 
     % perldoc Git::Annex
-    % man annex-review-unused
+    % man git-annex-reviewunused
 
 You can also look for information at:
 
diff --git a/bin/annex-review-unused b/bin/git-annex-reviewunused
index 99d8798..b4fa7e3 100755
--- a/bin/annex-review-unused
+++ b/bin/git-annex-reviewunused
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# PODNAME: annex-review-unused
+# PODNAME: git-annex-reviewunused
 # ABSTRACT: interactively process 'git annex unused' output
 #
 # Copyright (C) 2019-2020  Sean Whitton <spwhitton@spwhitton.name>
@@ -19,7 +19,7 @@
 
 =head1 SYNOPSIS
 
-B<annex-review-unused> [B<--just-print>] [B<--from=>I<REMOTE>] [B<--used-refspec=>I<USEDREFSPEC>]
+B<git annex reviewunused> [B<--just-print>] [B<--from=>I<REMOTE>] [B<--used-refspec=>I<USEDREFSPEC>]
 
 =head1 DESCRIPTION
 
@@ -57,5 +57,5 @@ git-annex-unused(1), git-annex-dropunused(1)
 
 =cut
 
-use App::annex_review_unused;
-exit App::annex_review_unused->main;
+use App::git_annex_reviewunused;
+exit App::git_annex_reviewunused->main;
diff --git a/lib/App/annex_review_unused.pm b/lib/App/git_annex_reviewunused.pm
index dd2ed23..175d7a0 100644
--- a/lib/App/annex_review_unused.pm
+++ b/lib/App/git_annex_reviewunused.pm
@@ -1,4 +1,4 @@
-package App::annex_review_unused;
+package App::git_annex_reviewunused;
 # ABSTRACT: interactively process 'git annex unused' output
 #
 # Copyright (C) 2019-2020  Sean Whitton <spwhitton@spwhitton.name>
@@ -33,7 +33,7 @@ CORE::exit main unless caller;
 
 =func main
 
-Implementation of annex-review-unused(1).  Please see documentation
+Implementation of git-annex-reviewunused(1).  Please see documentation
 for that command.
 
 Normally takes no arguments and responds to C<@ARGV>.  If you want to
diff --git a/t/24_annex-review-unused.t b/t/24_git-annex-reviewunused.t
index 4947455..b84b608 100755
--- a/t/24_annex-review-unused.t
+++ b/t/24_git-annex-reviewunused.t
@@ -5,7 +5,7 @@ use strict;
 use warnings;
 use lib 't/lib';
 
-use App::annex_review_unused;
+use App::git_annex_reviewunused;
 use Test::More;
 use t::Setup;
 use t::Util;
@@ -21,13 +21,13 @@ with_temp_annexes {
 
     {
         local $CWD = "source1";
-        (undef, undef, $exit) = run_bin "annex-review-unused";
+        (undef, undef, $exit) = run_bin "git-annex-reviewunused";
         ok !$exit, "it exits zero when no unused files";
         sleep 1;
         $source1->rm("foo/foo2/baz");
         $source1->commit({ message => "rm" });
 
-        ($output, undef, $exit) = run_bin qw(annex-review-unused --just-print);
+        ($output, undef, $exit) = run_bin qw(git-annex-reviewunused --just-print);
         ok $exit, "it exits nonzero when unused files";
         ok 20 < @$output && @$output < 30, "it prints ~two log entries";
         like $output->[5], qr/unused file #1/, "it prints an expected line";