{-# LANGUAGE OverloadedStrings #-}

module OpenTelemetry.Resource.Telemetry.Detector where

import qualified Data.Text as T
import Data.Version (showVersion)
import OpenTelemetry.Resource.Telemetry
import Paths_hs_opentelemetry_sdk


-- | Built-in information about this package
detectTelemetry :: Telemetry
detectTelemetry :: Telemetry
detectTelemetry =
  Telemetry
    { telemetrySdkName :: Text
telemetrySdkName = Text
"hs-opentelemetry-sdk"
    , telemetrySdkLanguage :: Maybe Text
telemetrySdkLanguage = forall a. a -> Maybe a
Just Text
"haskell"
    , telemetrySdkVersion :: Maybe Text
telemetrySdkVersion = forall a. a -> Maybe a
Just forall a b. (a -> b) -> a -> b
$ String -> Text
T.pack forall a b. (a -> b) -> a -> b
$ Version -> String
showVersion Version
version
    , telemetryAutoVersion :: Maybe Text
telemetryAutoVersion = forall a. Maybe a
Nothing
    }