Skip to content

Commit e80caa3

Browse files
committed
Update deps and simplify code
1 parent 0ef2da0 commit e80caa3

File tree

2 files changed

+2
-6
lines changed

2 files changed

+2
-6
lines changed

examples/timeflies/Program.fs

Lines changed: 1 addition & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -36,7 +36,7 @@ frame.bind ("<Motion>", agent.Post) |> ignore
3636
frame.pack ()
3737

3838
let stream =
39-
Seq.toList "TIME FLIES LIKE AN ARROW"
39+
"TIME FLIES LIKE AN ARROW"
4040
|> Seq.mapi (fun i c -> i, Label(frame, text = (string c), fg = "black", bg = "white"))
4141
|> AsyncRx.ofSeq
4242
|> AsyncRx.flatMap (fun (i, label) ->
@@ -50,8 +50,6 @@ let sink (ev: Notification<Label * int * int>) =
5050
| OnNext (label, x, y) -> queue.put (Place(label, x, y))
5151
| OnError (err) -> printfn $"Stream Error: {err}"
5252
| _ -> printfn "Stream Completed!"
53-
54-
return ()
5553
}
5654

5755
let mainAsync =
@@ -74,8 +72,6 @@ let mainAsync =
7472

7573
root.after (1, update)
7674
root.mainloop ()
77-
78-
return ()
7975
}
8076

8177
[<EntryPoint>]

examples/timeflies/TimeFlies.fsproj

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@
99
<Compile Include="Program.fs" />
1010
</ItemGroup>
1111
<ItemGroup>
12-
<PackageReference Include="Fable.Python" Version="0.22.0" />
12+
<PackageReference Include="Fable.Python" Version="4.0.0-theta-*" />
1313
<PackageReference Include="Fable.Core" Version="4.0.0-theta-*" />
1414
<PackageReference Include="FSharp.Control.AsyncRx" Version="1.6.5" />
1515
</ItemGroup>

0 commit comments

Comments
 (0)