aboutsummaryrefslogtreecommitdiff
path: root/lib/API.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/API.hs')
-rw-r--r--lib/API.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/API.hs b/lib/API.hs
index 3962f73..ce1f7e8 100644
--- a/lib/API.hs
+++ b/lib/API.hs
@@ -28,8 +28,8 @@ import Servant (Application, FormUrlEncoded,
import Servant.API (Accept, Capture, Get, JSON,
MimeRender, MimeUnrender,
NoContent, OctetStream, PlainText,
- Post, QueryParam, Raw, ReqBody,
- type (:<|>) (..), QueryFlag)
+ Post, QueryFlag, QueryParam, Raw,
+ ReqBody, type (:<|>) (..))
import Servant.API.WebSocket (WebSocket)
import Servant.Swagger (HasSwagger (..))
import Web.Internal.FormUrlEncoded (Form)
@@ -47,15 +47,15 @@ import GTFS (Depth (Deep), GTFSFile (..),
StationID, Trip, TripId,
aesonOptions, swaggerOptions)
import Network.HTTP.Media ((//))
+import qualified OwnTracks as OT
import Persist
import Prometheus
import Proto.GtfsRealtime (FeedMessage)
import Servant.API.ContentTypes (Accept (..))
-import qualified OwnTracks as OT
-- | a bare ping as sent by a tracker device
data SentPing = SentPing
- { sentPingTrackerId :: TrackerId
+ { sentPingTrackerId :: TrackerId
, sentPingGeopos :: Geopos
, sentPingTimestamp :: UTCTime
} deriving (Generic)