on master help sign in
Fix up some formatting
commit8bc822852fc160cfec9cb5ed0c4269a1a21df874 authorBryan O'Sullivan <bos@serpentine.com> dateFri 10 Jul 2015, 10:48 (11 years ago) parentb024cd2
1 file changed+10−10
examples/Twitter/Manual.hs+10−10
examples/Twitter/Manual.hs+10−10
@@ -113,17 +113,17 @@ instance ToJSON Result where
113113 ]
114114
115115 toEncoding Result{..} = pairs $
116− "results" .= results
117− <> "max_id" .= max_id
118− <> "since_id" .= since_id
119− <> "refresh_url" .= refresh_url
120− <> "next_page" .= next_page
116+ "results" .= results
117+ <> "max_id" .= max_id
118+ <> "since_id" .= since_id
119+ <> "refresh_url" .= refresh_url
120+ <> "next_page" .= next_page
121121 <> "results_per_page" .= results_per_page
122− <> "page" .= page
123− <> "completed_in" .= completed_in
124− <> "since_id_str" .= since_id_str
125− <> "max_id_str" .= max_id_str
126− <> "query" .= query
122+ <> "page" .= page
123+ <> "completed_in" .= completed_in
124+ <> "since_id_str" .= since_id_str
125+ <> "max_id_str" .= max_id_str
126+ <> "query" .= query
127127
128128instance FromJSON Result where
129129 parseJSON (Object v) = Result <$>