                                `(:family ,family :height ,height :inherit ,other-face)
                              `(:family ,family :height ,height))
                      'display `(raise ,v-adjust)
+                     'rear-nonsticky t
                      'font-lock-ignore t)))
      (defun ,(all-the-icons--insert-function-name name) (&optional arg)
        ,(format "Insert a %s icon at point." family)


(defun all-the-icons--read-candidates ()
  "Helper to build a list of candidates for all families."
  (reduce 'append (mapcar (lambda (it) (all-the-icons--read-candidates-for-family it t)) all-the-icons-font-families)))

(defun all-the-icons--read-candidates-for-family (family &optional show-family)
  "Helper to build read candidates for FAMILY.

;;; Code:
(require 'font-lock+)
(require 'memoize)
(require 'cl-lib)

(require 'data-alltheicons  "./data/data-alltheicons.el")
(require 'data-faicons      "./data/data-faicons.el")
