From e39d790116ffb7a984c219927cf33c7258d98627 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 3 Sep 2020 17:52:09 +0100
Subject: [PATCH] nook-case: edge ledge

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 nook-case.scad | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/nook-case.scad b/nook-case.scad
index 83c6f25..62f954c 100644
--- a/nook-case.scad
+++ b/nook-case.scad
@@ -101,11 +101,13 @@ edge_ledge_rad = edge_ledge_h;
 module RightSideMainProfile() {
   rectfromto(spp7, spp0);
   rectfromto(spp7, spp20);
+  EdgeLedgeProfile();
 }
 
 module LeftSideMainProfile() {
   rectfromto(spp7, spp30);
   rectfromto(spp7, spp20);
+  EdgeLedgeProfile();
 }
 
 module EdgeLedgeProfile() {
@@ -203,9 +205,13 @@ module FaceCore(z0,z1, extra_left, extra_right){
     for (mx=[0,1]) mirror([mx,0,0]) {
 	for (my=[0,1]) mirror([0,my,0]) {
 	    translate(-nom_cnr) {
-	      rotate_extrude(angle=90, convexity=10)
-		translate(-[1,0,0] * nook_cnr_rad)
-		children(mx);
+	      rotate_extrude(angle=90, convexity=10) {
+		intersection(){
+		  translate(-[1,0,0] * nook_cnr_rad)
+		    children(mx);
+		  rectfromto([-100,-100], [0,100]);
+		}
+	      }
 	    }
 	  }
 	translate([nook_w/2, 0,0])
-- 
2.30.2