From 02625cd3767d9fd5be07f1198b763fcb2b63da5d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 9 Apr 2016 15:10:26 -0400 Subject: add AdjBranch newtype; some simplications --- Upgrade/V5.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Upgrade') diff --git a/Upgrade/V5.hs b/Upgrade/V5.hs index ee213b613..08e9271a0 100644 --- a/Upgrade/V5.hs +++ b/Upgrade/V5.hs @@ -54,12 +54,12 @@ upgrade automatic = do {- Create adjusted branch where all files are unlocked. - This should have the same content for each file as - have been staged in upgradeDirectWorkTree. -} - adjbranch <- adjustBranch UnlockAdjustment cur + AdjBranch b <- adjustBranch UnlockAdjustment cur {- Since the work tree was already set up by - upgradeDirectWorkTree, and contains unlocked file - contents too, don't use git checkout to check out the - adjust branch. Instead, update HEAD manually. -} - inRepo $ setHeadRef adjbranch + inRepo $ setHeadRef b configureSmudgeFilter -- Inode sentinal file was only used in direct mode and when -- locking down files as they were added. In v6, it's used more -- cgit v1.2.3