fix view changing when in subdir

Failed reading some files with relative paths. This is a quick and dirty
fix.
This commit is contained in:
Joey Hess 2014-02-18 20:57:14 -04:00
parent 9b51d43318
commit 72c118152f
5 changed files with 18 additions and 23 deletions

View file

@ -32,7 +32,7 @@ start = go =<< currentView
<$> recentViews
case vs of
(_v:oldv:_) -> next $ next $
checkoutViewBranch oldv (branchView oldv)
checkoutViewBranch oldv (return . branchView)
_ -> next $ next $
inRepo $ Git.Command.runBool
[ Param "checkout"