[elpa] externals/boxy-headings 003479ff2f 28/45: Added more tests

[ELPA Syncer]

branch: externals/boxy-headings
commit 003479ff2f5679d86654a8c61cd2c7df011bce2f
Author: Amy Grinn <grinn....@gmail.com>
Commit: Amy Grinn <grinn....@gmail.com>

    Added more tests
---
 boxy-headings.el |  2 +-
 tests/smoke.org  | 53 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 54 insertions(+), 1 deletion(-)

diff --git a/boxy-headings.el b/boxy-headings.el
index e0193b0bd1..085369bdd2 100644
--- a/boxy-headings.el
+++ b/boxy-headings.el
@@ -296,7 +296,7 @@ diagram."
                                 `(lambda (box)
                                    (mapc
                                     (lambda (h) (boxy-headings--add-heading h 
box))
-                                    ',children))))))))
+                                    ',siblings))))))))
 
 ;;;; Utility expressions
 
diff --git a/tests/smoke.org b/tests/smoke.org
index d843e9667c..89ab0d7f70 100644
--- a/tests/smoke.org
+++ b/tests/smoke.org
@@ -123,3 +123,56 @@
               │         │
               ╰─────────╯
   #+end_example
+
+* PASS Children test
+  #+begin_src org
+    ,* test
+    ,** Above
+       :PROPERTIES:
+       :REL:      above
+       :END:
+    ,** Below
+       :PROPERTIES:
+       :REL:      below
+       :END:
+    ,** Left
+       :PROPERTIES:
+       :REL:      left
+       :END:
+    ,** Right
+       :PROPERTIES:
+       :REL:      right
+       :END:
+    ,** In
+    ,** Behind
+       :PROPERTIES:
+       :REL:      behind
+       :END:
+    ,** On top
+       :PROPERTIES:
+       :REL:      on-top
+       :END:
+    ,** In front
+       :PROPERTIES:
+       :REL:      in-front
+       :END:
+  #+end_src
+  #+begin_example
+
+  ╭───────────────────────────────────────╮
+  │                                       │
+  │  *Org Src smoke.org[ org ]*           │
+  │                                       │
+  │  ╭────────╮  ╔════════╗  ╭─────────╮  │
+  │  │        │  ║        ║  │         │  │
+  │  │  Left  │  ║  test  ║  │  Right  │  │
+  │  │        │  ║        ║  │         │  │
+  │  ╰────────╯  ╚════════╝  ╰─────────╯  │
+  │                                       │
+  │              ╭─────────╮              │
+  │              │         │              │
+  │              │  Below  │              │
+  │              │         │              │
+  │              ╰─────────╯              │
+  ╰───────────────────────────────────────╯
+  #+end_example