From bfb32f283d0fcd5f187290f1c34b820d965b0f5a Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 16 Dec 2012 19:05:38 +0000
Subject: [PATCH] cable-hole-trunking-cover: lid done

---
 cable-hole-trunking-cover.scad | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/cable-hole-trunking-cover.scad b/cable-hole-trunking-cover.scad
index 9551d1e..584ee01 100644
--- a/cable-hole-trunking-cover.scad
+++ b/cable-hole-trunking-cover.scad
@@ -23,6 +23,7 @@ sidewallt = 3;
 lidt = 2;
 endwallt = 2;
 zslop = 0.75;
+endslop = 0.75;
 
 module sheared_cube(sz, xperz, yperz) {
   multmatrix([[1,0,xperz,0],
@@ -54,16 +55,19 @@ module Base(){
 }
 
 module Lid(){
-  lidx = basex;
+  lidx = basex + endslop + endwallt;
   for (mir=[0,1]) mirror([0,mir,0]) {
     translate([0, basey/2 + sideslop, 0])
       sheared_cube([lidx, sidewallt, bevelz], 0, bevelslope);
     translate([0, basey/2 + sideslop + bevely, -tapethick])
       cube([lidx, sidewallt, innerz + tapethick + lidt + zslop]);
-    translate([0, 0, innerz + zslop])
-      cube([lidx, basey/2 + sideslop + bevely + sidewallt, lidt]);
+    translate([0, -1, innerz + zslop])
+      cube([lidx, 1 + basey/2 + sideslop + bevely + sidewallt, lidt]);
+    translate([basex + endslop, -1, -tapethick])
+      cube([endwallt, 1 + basey/2 + sideslop + bevely + sidewallt,
+	    tapethick + innerz + zslop + 0.1]);
   }
 }
 
 Base();
-Lid();
+%Lid();
-- 
2.30.2