From f5cd44c4b9d3b319c8ffbe3afb69e3f7b67798bd Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 14 Feb 2016 15:03:15 +0000
Subject: [PATCH] sealing-box: reorg LidProfile for adding more near top left
 (nfc)

---
 sealing-box.scad.m4 | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/sealing-box.scad.m4 b/sealing-box.scad.m4
index 40b4f64..4765193 100644
--- a/sealing-box.scad.m4
+++ b/sealing-box.scad.m4
@@ -124,10 +124,12 @@ module SealingBox_LidProfile(){
   rad = tubesealrad + innertube;
   morex = wall;
   difference(){
-    translate([-SealingBox_lidbigger(),
-	       zbox - lidoverhang - innertube])
-      square([lidoverlap + innertube + wall,
+    translate([0, zbox + ceilth]) mirror([0,1]) {
+      translate([-SealingBox_lidbigger(),
+		 0])
+      square([lidoverlap + innertube + tubesealrad,
 	      lidoverhang + innertube + ceilth]);
+    }
     hull(){
       translate([tubesealrad,
 		 zbox - innertube - tubesealrad])
-- 
2.30.2