diff options
| author | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-02 00:55:06 +0400 |
|---|---|---|
| committer | Sam Truzjan <pxqr.sta@gmail.com> | 2013-12-02 00:55:06 +0400 |
| commit | cc1f6959280431a3554e0c0f01960b7b67826c65 (patch) | |
| tree | 62d60709efc26889dfb3f4588ef546ece63c06d4 /src/Data/Torrent/Progress.hs | |
| parent | 9a73e365f4c29080ab6ce04290b36e3189171289 (diff) | |
| parent | af9573a7519e76c10a0cca168355ca866d22c429 (diff) | |
Merge branch 'master' of https://github.com/cobit/bittorrent
Diffstat (limited to 'src/Data/Torrent/Progress.hs')
| -rw-r--r-- | src/Data/Torrent/Progress.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Data/Torrent/Progress.hs b/src/Data/Torrent/Progress.hs index 1a4a68e2..34f8f299 100644 --- a/src/Data/Torrent/Progress.hs +++ b/src/Data/Torrent/Progress.hs | |||
| @@ -62,7 +62,7 @@ data Progress = Progress | |||
| 62 | } deriving (Show, Read, Eq) | 62 | } deriving (Show, Read, Eq) |
| 63 | 63 | ||
| 64 | $(makeLenses ''Progress) | 64 | $(makeLenses ''Progress) |
| 65 | $(deriveJSON L.tail ''Progress) | 65 | $(deriveJSON defaultOptions { fieldLabelModifier = L.tail } ''Progress) |
| 66 | 66 | ||
| 67 | -- | UDP tracker compatible encoding. | 67 | -- | UDP tracker compatible encoding. |
| 68 | instance Serialize Progress where | 68 | instance Serialize Progress where |