Merge pull request #31 from well-typed/edsko/avoid-PackageInfo

Don't use `PackageInfo`
well-typed · Aug 7, 2023 · 3836078 · 3836078
2 parents f93655f + 275ace8
commit 3836078
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 8 deletions.
diff --git a/grapesy.cabal b/grapesy.cabal
@@ -125,8 +125,7 @@ library
       Network.GRPC.Util.Session.Server
       Network.GRPC.Util.Thread
       Network.GRPC.Util.TLS
-
-      PackageInfo_grapesy
+      Paths_grapesy
   hs-source-dirs:
       src
   build-depends:

diff --git a/src/Network/GRPC/Spec/Request.hs b/src/Network/GRPC/Spec/Request.hs
@@ -26,7 +26,7 @@ import Network.GRPC.Spec.PercentEncoding qualified as PercentEncoding
 import Network.GRPC.Spec.RPC
 import Network.GRPC.Util.Partial
 
-import PackageInfo_grapesy qualified as PackageInfo
+import Paths_grapesy qualified as Grapesy
 
 {-------------------------------------------------------------------------------
   Construction
@@ -138,13 +138,10 @@ callDefinition proxy = \hdrs -> catMaybes [
     buildUserAgent = (
           "user-agent"
         , mconcat [
-              "grpc-"
-            , "haskell"
-            , "-" <> BS.Strict.C8.pack (PackageInfo.name)
-            , "/"
+              "grpc-haskell-grapesy/"
             , mconcat . intersperse "." $
                 map (BS.Strict.C8.pack . show) $
-                  versionBranch PackageInfo.version
+                  versionBranch Grapesy.version
             ]
         )