From 565fa30f3e156562b3ef26939b0a407c11dbb603 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 31 Aug 2015 23:07:29 +0100
Subject: [PATCH] pull-cord-keeper: Break out VExtrude and OuterOval

---
 pull-cord-keeper.scad | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/pull-cord-keeper.scad b/pull-cord-keeper.scad
index 4812465..d225fb1 100644
--- a/pull-cord-keeper.scad
+++ b/pull-cord-keeper.scad
@@ -33,10 +33,20 @@ module Oval(centredist, rad) {
   }
 }  
 
+module VExtrude(){
+  translate([0,0, -height/2])
+    linear_extrude(height=20)
+    children(0);
+}
+
+module OuterOval(){
+  Oval(hcentredist, houterrad);
+}
+
 module Hoop(){
   difference(){
     hull(){
-      Oval(hcentredist, houterrad);
+      OuterOval();
       translate([0, (blockdepth + hoopthick)/2 + hinnerrad])
 	square([blockwidth,
 		blockdepth + hoopthick],
@@ -48,8 +58,7 @@ module Hoop(){
 
 module Positive(){
   difference(){
-    translate([0,0, -height/2])
-      linear_extrude(height=20)
+    VExtrude()
       Hoop();
 
     rotate([90,0,0])
-- 
2.30.2