summaryrefslogtreecommitdiff
path: root/perl5
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2022-10-16 15:17:50 -0700
committerSean Whitton <spwhitton@spwhitton.name>2022-10-18 12:40:47 -0700
commitfb078c0fb7f275f802eb78531344ef848798646b (patch)
treef0d865572ab0be9626bdb5d1adbf83f95363d3e5 /perl5
parentde5e6bed742ac7167eaf93c685e95470d26f9ed7 (diff)
downloaddotfiles-fb078c0fb7f275f802eb78531344ef848798646b.tar.gz
register all git worktrees with myrepos
Diffstat (limited to 'perl5')
-rw-r--r--perl5/Local/Homedir.pm6
1 files changed, 1 insertions, 5 deletions
diff --git a/perl5/Local/Homedir.pm b/perl5/Local/Homedir.pm
index 3030f4b0..b20259b6 100644
--- a/perl5/Local/Homedir.pm
+++ b/perl5/Local/Homedir.pm
@@ -208,10 +208,6 @@ sub say_block (*$$) {
print $fh "\n";
}
-sub is_repo {
- my ($repo, $include_worktrees) = @_;
- return -d "$repo/.git" || -d "$repo/.hg"
- || $include_worktrees && -f "$repo/.git";
-}
+sub is_repo { -e "$_[0]/.git" or -d "$_[0]/.hg" }
1;