     ;;sibling
     [(siblings ?a ?b)
      [?a :parent ?p]
-     [?b :parent ?p]]
+     [?b :parent ?p]
+     [(!= ?a ?b)]]
 
     [(next-sibling ?this ?next)
      [?next :prev-sibling ?this]]

       @conn rules)

  (defn tech-spec [conn label]
    (d/q '[:find ?value-text
           :in $ % ?label-text
           :where
           [?label :tag :h4]
           [?label :class "inline"]
           (text ?label ?label-text)

           (next-sibling ?label ?value)
           (text ?value ?value-text)]
         @conn rules label))

  (tech-spec conn "Runtime:")
  (tech-spec conn "Color:")
  (tech-spec conn "Sound Mix:")
  (tech-spec conn "Aspect Ratio:") ;;fails, because there it's raw text (not in a tag)
  
  )


     [?text-node :parent ?container]
     [?text-node :tag :text-node]
     [?text-node :text ?text]]

    [(text ?container ?text)
     [?container :tag :text-node]
     [?container :text ?text]]

    [(path2 ?a ?b)
     [?b :parent ?a]]
