summaryrefslogtreecommitdiff
path: root/script.it/script.ml
diff options
context:
space:
mode:
authorSébastien Dailly <sebastien@chimrod.com>2021-01-07 14:20:54 +0100
committerSébastien Dailly <sebastien@chimrod.com>2021-01-07 14:20:54 +0100
commit21c386fee208adb7b494d2677d9f49ed49a1c1ce (patch)
treeb1c77a0c1870768a4876ec58cc06962768a3fe75 /script.it/script.ml
parent06c39bbea3b7f8e6bfec88878ec80f9cc474184f (diff)
Local point configuration
Diffstat (limited to 'script.it/script.ml')
-rwxr-xr-xscript.it/script.ml6
1 files changed, 5 insertions, 1 deletions
diff --git a/script.it/script.ml b/script.it/script.ml
index e91dc92..fc64d1e 100755
--- a/script.it/script.ml
+++ b/script.it/script.ml
@@ -281,7 +281,11 @@ let on_change canva mouse_position timer state =
~h:10.
context;
-
+ Cd2d.stroke_text
+ context
+ (Jstr.of_float @@ Path.Point.get_stamp point)
+ ~x:(x +. 15.)
+ ~y;
| _ -> ()
in