diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2020-03-10 12:00:49 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-03-10 12:00:49 -0700 |
| commit | f1b9bcc7e22c710c7bccf0baa08057cdbd53491b (patch) | |
| tree | e244d83a2240bd2747410ca95e8f1c090bcf3ab5 /lib | |
| parent | 54a69a5df4195988711bd20e816d3108a181fa35 (diff) | |
| download | p5-Git-Annex-f1b9bcc7e22c710c7bccf0baa08057cdbd53491b.tar.gz | |
annex-to-annex: Fix path when looking for missing files
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/App/annex_to_annex.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/App/annex_to_annex.pm b/lib/App/annex_to_annex.pm index d68cc4a..cd054cc 100644 --- a/lib/App/annex_to_annex.pm +++ b/lib/App/annex_to_annex.pm @@ -109,9 +109,9 @@ sub main { #>>> } - my $base = basename $source; my @missing - = $annex->annex->find("--not", "--in", "here", $base); + = $annex->annex->find("--not", "--in", "here", + abs2rel $source, $annex->toplevel); if (@missing) { say "Following annexed files are not present in this repo:"; say for @missing; |