        :correct-paths (get-paths-for-key root-type typ ky)
        :confidence :high})))
 
-(defn misspelled-misplaced-key [root-type parent-type bad-key value]
+#_(defn misspelled-misplaced-key [root-type parent-type bad-key value]
   (let [parent-type-set
         (set (cons parent-type (decendent-types *schema-rules* parent-type)))]
     (sort-by

        :correct-paths (get-paths-for-key root-type typ ky)
        :confidence :high}))))

(defn unknown-key-error-help [root-type parent-type bad-key value error]
  (first
   (filter
    not-empty


;; this could be improved by considering the type of the
;; current parent value by considering the parents other keys
#_(defn misspelled-key [parent-type bad-key value error]
  (take 1
   (sort-by
    #(-> % :distance-score -)
