Use document client width instead of window inner width

Author: Sébastien

src/widgets/ot_tip.eliom

@@ -47,11 +47,7 @@ let%client display ?(container_a = [a_class ["ot-tip-container"]])
     @@ Js.Optdef.get Dom_html.window##.innerHeight
     @@ fun () -> Dom_html.document##.documentElement##.clientHeight
   in
-  let d_width =
-    float
-    @@ Js.Optdef.get Dom_html.window##.innerWidth
-    @@ fun () -> Dom_html.document##.documentElement##.clientWidth
-  in
+  let d_width = float Dom_html.document##.documentElement##.clientWidth in
   let o_bounds = origin##getBoundingClientRect in
   let o_left = o_bounds##.left in
   let o_right = o_bounds##.right in