From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 14 Feb 2016 15:03:15 +0000 (+0000)
Subject: sealing-box: reorg LidProfile for adding more near top left (nfc)
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=f5cd44c4b9d3b319c8ffbe3afb69e3f7b67798bd

sealing-box: reorg LidProfile for adding more near top left (nfc)
---

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])