toolbox-inserts: Break out FixingDemoIndicator

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

diff --git a/toolbox-inserts.scad b/toolbox-inserts.scad
index a4e06ba97379f3708de8072e830a5aaa8ce61086..4e8615d21afcebf07cab6a1ecf057a884d1e71cf 100644 (file)
--- a/toolbox-inserts.scad
+++ b/toolbox-inserts.scad
@@ -156,6 +156,13 @@ module FixingInternalThread(){
                  test=$screw_test);
 }
 
+module FixingDemoIndicator() {
+  %union() {
+    linextr(0, 30) circle(r= 0.5, $fn=4);
+    linextr(0, $fixing_depth) circle(r= fixing_nom_d/2);
+  }
+}
+
 //---------- wells (relating to the -ve space in holders) ----------
 
 module WellSurroundGapElevation(z_bottom_def, z_edge, z_wayhigh, gap) {
@@ -219,10 +226,7 @@ module WellSurround(
            AtFixingPositions(hull_group) FixingSurround();
          }
          AtFixingPositions(hull_group)
-           %union() {
-             linextr(0, 30) circle(r= 0.5, $fn=4);
-             linextr(0, $fixing_depth) circle(r= fixing_nom_d/2);
-           }
+           FixingDemoIndicator();
        }
       }