diff --git a/mu-protobuf.cabal b/mu-protobuf.cabal
--- a/mu-protobuf.cabal
+++ b/mu-protobuf.cabal
@@ -1,5 +1,5 @@
 name:          mu-protobuf
-version:       0.4.0.2
+version:       0.4.0.3
 synopsis:
   Protocol Buffers serialization and gRPC schema import for Mu microservices
 
@@ -33,13 +33,13 @@
   build-depends:
       base                    >=4.12  && <5
     , bytestring              >=0.10  && <0.11
-    , compendium-client       ==0.2.*
+    , compendium-client       >=0.2   && <0.3
     , http-client             >=0.6   && <0.7
     , http2-grpc-proto3-wire  >=0.1   && <0.2
     , language-protobuf       >=1.0.1 && <2
-    , mu-rpc                  ==0.4.*
-    , mu-schema               ==0.3.*
-    , proto3-wire             >=1.1   && < 2
+    , mu-rpc                  >=0.4   && <0.5
+    , mu-schema               >=0.3   && <0.4
+    , proto3-wire             >=1.1   && <2
     , servant-client-core     >=0.16  && <0.19
     , sop-core                >=0.5   && <0.6
     , template-haskell        >=2.14  && <2.17
diff --git a/src/Mu/Adapter/ProtoBuf.hs b/src/Mu/Adapter/ProtoBuf.hs
--- a/src/Mu/Adapter/ProtoBuf.hs
+++ b/src/Mu/Adapter/ProtoBuf.hs
@@ -44,7 +44,7 @@
 import           Data.SOP                 (All)
 import qualified Data.Text                as T
 import qualified Data.Text.Lazy           as LT
-import           Data.Word                (Word64, Word32)
+import           Data.Word                (Word32, Word64)
 import           GHC.TypeLits
 import           Proto3.Wire
 import qualified Proto3.Wire.Decode       as PBDec
diff --git a/src/Mu/Quasi/GRpc.hs b/src/Mu/Quasi/GRpc.hs
--- a/src/Mu/Quasi/GRpc.hs
+++ b/src/Mu/Quasi/GRpc.hs
@@ -86,18 +86,18 @@
     argToType P.Single (P.TOther ["google","protobuf","Empty"])
       = [t| '[ ] |]
     argToType P.Single (P.TOther a)
-      = [t| '[ 'ArgSingle ('Nothing :: Maybe Symbol) ('SchemaRef $(schemaTy s) $(textToStrLit (last a))) ] |]
+      = [t| '[ 'ArgSingle ('Nothing :: Maybe Symbol) ('SchemaRef $(schemaTy s) $(textToStrLit (T.intercalate "." a))) ] |]
     argToType P.Stream (P.TOther a)
-      = [t| '[ 'ArgStream ('Nothing :: Maybe Symbol) ('SchemaRef $(schemaTy s) $(textToStrLit (last a))) ] |]
+      = [t| '[ 'ArgStream ('Nothing :: Maybe Symbol) ('SchemaRef $(schemaTy s) $(textToStrLit (T.intercalate "." a))) ] |]
     argToType _ _
       = fail "only message types may be used as arguments"
 
     retToType P.Single (P.TOther ["google","protobuf","Empty"])
       = [t| 'RetNothing |]
     retToType P.Single (P.TOther a)
-      = [t| 'RetSingle ('SchemaRef $(schemaTy s) $(textToStrLit (last a))) |]
+      = [t| 'RetSingle ('SchemaRef $(schemaTy s) $(textToStrLit (T.intercalate "." a))) |]
     retToType P.Stream (P.TOther a)
-      = [t| 'RetStream ('SchemaRef $(schemaTy s) $(textToStrLit (last a))) |]
+      = [t| 'RetStream ('SchemaRef $(schemaTy s) $(textToStrLit (T.intercalate "." a))) |]
     retToType _ _
       = fail "only message types may be used as results"