wait a little between opening the tweet area and finding it

2023-05-16 13:10:04 +02:00 · 2023-05-16 13:10:04 +02:00 · 2518fca99d
commit 2518fca99d
parent 5e6c764ae4
1 changed files with 1 additions and 0 deletions
--- a/bin/twitter.ml
+++ b/bin/twitter.ml
@ -151,6 +151,7 @@ let tweet ctx msg =
      else List.nth l 0
  in
  click ctx.session_id tweet_button;
+  Unix.sleep 2;
  let tweet_area =
    match find ctx.session_id (CSS "div[data-testid='tweetTextarea_0']") with
    | [] -> raise (Any (fmt "Tweet area not found"))