From 06f9b413dd355fd5652491ff212d93687a788f9a Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 15 Feb 2014 19:27:13 +0000
Subject: [PATCH] wardrobe-hook: wip, combine

---
 wardrobe-hook.scad | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/wardrobe-hook.scad b/wardrobe-hook.scad
index ecb1b12..e43822e 100644
--- a/wardrobe-hook.scad
+++ b/wardrobe-hook.scad
@@ -74,6 +74,11 @@ module ElevationCore(){
 	   ellow]);
 }
 
-Plan();
-translate([50,0])
-  ElevationCore();
+intersection(){
+  translate([0,1, -(topwidth+10)/2])
+    linear_extrude(height=topwidth+10) Plan();
+  translate([50,0])
+    rotate([0,-90,0])
+    linear_extrude(height=100)
+    ElevationCore();
+}
-- 
2.30.2