| By | fr33domlover |
| At | 2016-04-26 |
| Title | Add git service type and get/put |
| Description |
Edit file hit-network.cabal 0 → 0
+ 35 Network.Git.Get
+ 38 Network.Git.Types
- 42 Network.Git.Get
- 43 Network.Git.Types
… … … … Edit file src/Network/Git/Get.hs 0 → 0
+ 26 , parseService
… … … … + 106 parseService :: ByteString -> Maybe Service
+ 107 parseService "git-upload-pack" = Just UploadPack
+ 108 parseService _ = Nothing
+ 109 … … … … Edit file src/Network/Git/Put.hs 0 → 0
+ 33 -- * Service
+ 34 , serializeService
… … … … + 132 serializeService :: Service -> ByteString
+ 133 serializeService UploadPack = "git-upload-pack"
+ 134 … … … … Edit file src/Network/Git/Types.hs 0 → 0
+ 28 -- * Other
+ 29 , Service (..)
… … … … + 111 data Service = UploadPack
+ 112 … … … …