diff options
| author | Mike Vink <> | 2023-04-11 19:00:10 +0200 |
|---|---|---|
| committer | Mike Vink <> | 2023-04-11 19:00:10 +0200 |
| commit | 73d25fc971ecd3f166d8fd6da663d3494933caad (patch) | |
| tree | 10b3e357e400867594a1c1f620a8d9d9ed75258d /fnl/conf/exctl/frames | |
| parent | 741f3405e712f13b55aafd8730b61dca4248b4ae (diff) | |
start composing
Diffstat (limited to 'fnl/conf/exctl/frames')
| -rw-r--r-- | fnl/conf/exctl/frames/frame.fnl | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/fnl/conf/exctl/frames/frame.fnl b/fnl/conf/exctl/frames/frame.fnl index f74e88d..e7cd1e9 100644 --- a/fnl/conf/exctl/frames/frame.fnl +++ b/fnl/conf/exctl/frames/frame.fnl @@ -30,10 +30,6 @@ (fn m.frame->coord [f] (fn [v] - (P :a (vec.scale (v:x-coord) (f:width-edge))) - (P :b (vec.scale (v:y-coord) (f:height-edge))) - (P :added (vec.add (vec.scale (v:x-coord) (f:width-edge)) - (vec.scale (v:y-coord) (f:height-edge)))) (vec.add (f:origin) (vec.add (vec.scale (v:x-coord) (f:width-edge)) (vec.scale (v:y-coord) (f:height-edge)))))) @@ -51,11 +47,12 @@ (local ori (f:origin)) (local width-edge (f:width-edge)) (local height-edge (f:height-edge)) + (local anchor (or anchor :NW)) {:width (width-edge:x-coord) :height (height-edge:y-coord) :col (ori:x-coord) :row (ori:y-coord) - :anchor :NW + : anchor :relative :editor}) (setmetatable m {:__call (fn [self ...] |
