toolbox-inserts: prepare wall for inner bevel

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/toolbox-inserts.scad b/toolbox-inserts.scad
index b41e6c4bcd5ce33b854b4c2011d025e20b160ee7..947476176176f843f4d3ae42415f4b79ac57b612 100644 (file)
--- a/toolbox-inserts.scad
+++ b/toolbox-inserts.scad
@@ -24,7 +24,7 @@ module DriverHandlePositive() { ////toplevel
 }
 
 module WallMinkowskiSphere(wall=well_surround_wall) { ////toplevel
-  sphere($fn=8, r=wall);
+  sphere($fn=8, r=wall/2);
 }
 
 module WellSurround(half_height, wall=well_surround_wall) {
@@ -41,8 +41,10 @@ module WellSurround(half_height, wall=well_surround_wall) {
     union(){
       minkowski(){
 
-       linextr(0, half_height - wall)
-         projection(cut=false) children(0);
+       linextr(0, half_height - wall/2)
+         offset($fn=4, r = wall/2)
+         projection(cut=false)
+         children(0);
 
        WallMinkowskiSphere(wall);