diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-10-16 15:17:50 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-10-18 12:40:47 -0700 |
commit | fb078c0fb7f275f802eb78531344ef848798646b (patch) | |
tree | f0d865572ab0be9626bdb5d1adbf83f95363d3e5 /perl5 | |
parent | de5e6bed742ac7167eaf93c685e95470d26f9ed7 (diff) | |
download | dotfiles-fb078c0fb7f275f802eb78531344ef848798646b.tar.gz |
register all git worktrees with myrepos
Diffstat (limited to 'perl5')
-rw-r--r-- | perl5/Local/Homedir.pm | 6 |
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; |