We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent e94db4f commit c5d8123Copy full SHA for c5d8123
src/Append.fs
@@ -3,10 +3,10 @@ namespace SqlStreamStore.FSharp
3
open SqlStreamStore.Streams
4
5
module Append =
6
- let private stringIdToGuid: Id -> System.Guid =
+ let private stringIdToGuid: StreamMessageId -> System.Guid =
7
function
8
- | Custom guid -> guid
9
- | Auto -> System.Guid.NewGuid()
+ | StreamMessageId.Custom guid -> guid
+ | StreamMessageId.Auto -> System.Guid.NewGuid()
10
11
let private newStreamMessageFromMessageDetails: MessageDetails -> NewStreamMessage =
12
fun msg ->
0 commit comments