From bb241297633fdbd98e849c9b8ff5102aed8b860b Mon Sep 17 00:00:00 2001
From: Leo Lou <louyuhong@gmail.com>
Date: Wed, 13 Jun 2018 15:59:02 +0900
Subject: [PATCH] Add pinky connectors row and col

---
 src/dactyl_keyboard/dactyl.clj | 26 +++++++++++++++++++++++++-
 1 file changed, 25 insertions(+), 1 deletion(-)

diff --git a/src/dactyl_keyboard/dactyl.clj b/src/dactyl_keyboard/dactyl.clj
index ef36e2f..b6f1f4f 100644
--- a/src/dactyl_keyboard/dactyl.clj
+++ b/src/dactyl_keyboard/dactyl.clj
@@ -274,6 +274,27 @@
          (map (partial apply hull)
               (partition 3 1 shapes))))
 
+(def pinky-connectors
+  (apply union
+         (concat
+          ;; Row connections
+          (for [row (range 0 lastrow)]
+            (triangle-hulls
+             (key-place lastcol row web-post-tr)
+             (key-place lastcol row wide-post-tr)
+             (key-place lastcol row web-post-br)
+             (key-place lastcol row wide-post-br)))
+
+          ;; Column connections
+          (for [row (range 0 cornerrow)]
+            (triangle-hulls
+             (key-place lastcol row web-post-br)
+             (key-place lastcol row wide-post-br)
+             (key-place lastcol (inc row) web-post-tr)
+             (key-place lastcol (inc row) wide-post-tr)))
+
+         )))
+
 (def connectors
   (apply union
          (concat
@@ -302,7 +323,8 @@
              (key-place column row web-post-br)
              (key-place column (inc row) web-post-tr)
              (key-place (inc column) row web-post-bl)
-             (key-place (inc column) (inc row) web-post-tl))))))
+             (key-place (inc column) (inc row) web-post-tl)))
+             )))
 
 ;;;;;;;;;;;;
 ;; Thumbs ;;
@@ -664,6 +686,7 @@
 (def model-right (difference
                   (union
                    key-holes
+                   pinky-connectors
                    connectors
                    thumb
                    thumb-connectors
@@ -690,6 +713,7 @@
        (difference
         (union
          key-holes
+         pinky-connectors
          connectors
          thumb
          thumb-connectors