From 2c684868ed9b3011033d5ec265dd9f891fe791b7 Mon Sep 17 00:00:00 2001 From: stuebinm Date: Thu, 16 Apr 2026 01:27:50 +0200 Subject: lib: formatter run --- lib/API.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lib/API.hs') 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) -- cgit v1.2.3