From 4db3c7b7c63f2ccba662f1d769d15696578fe097 Mon Sep 17 00:00:00 2001
From: Omar Rizwan <omar@omar.website>
Date: Sun, 23 Jul 2023 11:32:36 -0400
Subject: Revert "Calculate image slice from bottom left corner to top"

This reverts commit 29d621df6f7808c99a1fe3dac8599de8055f633e.
---
 virtual-programs/images.folk | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

(limited to 'virtual-programs')

diff --git a/virtual-programs/images.folk b/virtual-programs/images.folk
index 89dbcb23..ae40769a 100644
--- a/virtual-programs/images.folk
+++ b/virtual-programs/images.folk
@@ -93,12 +93,10 @@ When /someone/ wishes /p/ has camera slice & \
      the camera frame is /f/ & \
      /p/ has region /r/ {
 
-    # okay, need to get top & bottom
-    set top [region top $r]
-    lassign [lindex $r 0] a b c d
-
-    lassign [projectorToCamera $top] px0 py0
-    lassign [projectorToCamera $a] px1 py1
+    # Convert region in projector coordinates to camera
+    lassign [regionToBbox $r] minX minY maxX maxY
+    lassign [projectorToCamera [list $minX $minY]] px0 py0
+    lassign [projectorToCamera [list $maxX $maxY]] px1 py1
 
     # Clamp to image bounds
     set x [expr {int(max(min($px0, $px1), 0))}]
-- 
cgit v1.2.3