From 677692e59fbdd4906c740ba736d97dfcd127ce40 Mon Sep 17 00:00:00 2001
From: Tim Edwards <tim@opencircuitdesign.com>
Date: Mon, 18 Feb 2019 10:01:17 -0500
Subject: [PATCH] Corrected a potential problem with the substrate finding
 search, which can be given an invalid area for the search.

---
 extract/ExtSubtree.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/extract/ExtSubtree.c b/extract/ExtSubtree.c
index 60484e7c..24c91726 100644
--- a/extract/ExtSubtree.c
+++ b/extract/ExtSubtree.c
@@ -233,8 +233,9 @@ extSubtree(parentUse, reg, f)
 		/* even if there were no other interactions found.	*/
 		SearchContext scx;
 
+		GEOCLIP(&ha.ha_clipArea, &r);
 		scx.scx_trans = GeoIdentityTransform;
-		scx.scx_area = ha.ha_interArea;
+		scx.scx_area = r;
 		scx.scx_use = ha.ha_parentUse;
 		DBCellSrArea(&scx, extSubstrateFunc, (ClientData)&ha);
 	    }