toolbox-inserts: break out BoxCavityEdgeModelPlan

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

diff --git a/toolbox-inserts.scad b/toolbox-inserts.scad
index 7e881c6577c2a85bbbfe1fc485d9691d20081b4a..826a5fe604dcfaf7cbd7a5bd0a59c27916992fb7 100644 (file)
--- a/toolbox-inserts.scad
+++ b/toolbox-inserts.scad
@@ -185,17 +185,21 @@ module BoxCavityModelMainPlan() {
   }
 }
 
+module BoxCavityEdgeModelPlan() {
+  difference(){
+    BoxCavityModelMainPlan();
+    offset(r = -box_edge_width)
+      BoxCavityModelMainPlan();
+  }
+}
+
 module BoxCavityModel() { ////toplevel
   translate([ 0,0, -below_plane_z ]) {
     linextr(0, box_main_z)
       BoxCavityModelMainPlan();
     for (z = [-box_edge_z_hindent, box_main_z-10 + box_edge_z_hindent]) {
       linextr(z, z+10) {
-       difference(){
-         BoxCavityModelMainPlan();
-         offset(r = -box_edge_width)
-           BoxCavityModelMainPlan();
-       }
+       BoxCavityEdgeModelPlan();
       }
     }
   }