diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-06-02 16:34:52 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-06-02 16:34:52 -0400 |
| commit | 0ff2732d9583fd70d75cd8e365587803a7ac75ed (patch) | |
| tree | 8dde2949bfd29ea6adcf2a40f992fe6970872ebd /RemoteDaemon/Common.hs | |
| parent | b986b85cec119403c1a62fc268e26ff948de9fca (diff) | |
make LocalRepo a newtype
Diffstat (limited to 'RemoteDaemon/Common.hs')
| -rw-r--r-- | RemoteDaemon/Common.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/RemoteDaemon/Common.hs b/RemoteDaemon/Common.hs index 9efc0c4a0..982a84b43 100644 --- a/RemoteDaemon/Common.hs +++ b/RemoteDaemon/Common.hs @@ -30,7 +30,7 @@ liftAnnex (TransportHandle _ annexstate) a = do return r inLocalRepo :: TransportHandle -> (Git.Repo -> IO a) -> IO a -inLocalRepo (TransportHandle g _) a = a g +inLocalRepo (TransportHandle (LocalRepo g) _) a = a g -- Check if any of the shas are actally new in the local git repo, -- to avoid unnecessary fetching. |