From 7a04ce94eaa5e9c385ad6da9932a48fb19dff002 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 4 Jun 2017 17:56:20 +0100
Subject: [PATCH] sewing-table: break out teststrap_peg (nfc)

---
 sewing-table.scad.m4 | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index bfb00e2..73fc015 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -78,6 +78,8 @@ teststrapslots_at = [ [ 110, 70 ],
 		      [ 190, -80 ],
 		      ];
 
+teststrap_peg = [7.5, 3.5];
+
 // calculated
 
 TEST = false;
@@ -520,7 +522,7 @@ module Machine_Curves(){ ////toplevel
 }
 
 module TestStrapSlots(){
-  pegwidth = 7.5;
+  pegwidth = teststrap_peg[0];
   strap = [ 3, 5 ];
   for (pos = teststrapslots_at) {
     echo("TSS",pos);
-- 
2.30.2