diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-02-19 01:09:17 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-02-19 01:19:57 -0400 |
| commit | 51c12a76ef54affaf9428232fde4f2c3e30e7488 (patch) | |
| tree | 4cb2699e2b410260e383d3bf6da14d502aa0d0dc /Annex/View.hs | |
| parent | b5b5ead4b28fd08100bcac9cb9482263bac3a64e (diff) | |
remove Read instance for Ref
Removed instance, got it all to build using fromRef. (With a few things
that really need to show something using a ref for debugging stubbed out.)
Then added back Read instance, and made Logs.View use it for serialization.
This changes the view log format.
Diffstat (limited to 'Annex/View.hs')
| -rw-r--r-- | Annex/View.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/View.hs b/Annex/View.hs index d407ce4c9..cc2aad5b9 100644 --- a/Annex/View.hs +++ b/Annex/View.hs @@ -310,7 +310,7 @@ genViewBranch :: View -> Annex () -> Annex Git.Branch genViewBranch view a = withIndex $ do a let branch = branchView view - void $ inRepo $ Git.Branch.commit True (show branch) branch [] + void $ inRepo $ Git.Branch.commit True (fromRef branch) branch [] return branch {- Runs an action using the view index file. |