expose :: DbServer Rpc -> Rpc ()
expose imp = rpcExpose dbObjectPath (interfaces $ imp)
expose :: DbServer Rpc -> Rpc ()
expose imp = rpcExpose dbObjectPath (interfaces $ imp)
expose imp = rpcExpose dbObjectPath (interfaces $ imp)