fix build warning
This commit is contained in:
parent
d9bd90e598
commit
de6c5b6885
1 changed files with 1 additions and 1 deletions
|
@ -93,7 +93,7 @@ fixupDirect r = r
|
|||
- use yet. Except, do set mainWorkTreePath.
|
||||
-}
|
||||
fixupUnusualRepos :: Repo -> GitConfig -> IO Repo
|
||||
fixupUnusualRepos r@(Repo { location = l@(Local { worktree = Just w, gitdir = d }) }) c
|
||||
fixupUnusualRepos r@(Repo { location = Local { worktree = Just w, gitdir = d } }) c
|
||||
| isNothing (annexVersion c) =
|
||||
ifM (needsGitLinkFixup r)
|
||||
( setworktreepath r
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue