 
 (defun all-the-icons-match-to-alist (file alist)
   "Match FILE against an entry in ALIST using `string-match'."
-  (cdr (--first (string-match (car it) file) alist)))
+  (cdr (find-if (lambda (it) (string-match (car it) file)) alist)))
 
 (defun all-the-icons-dir-is-submodule (dir)
   "Checker whether or not DIR is a git submodule."


         (height (or height 2.0))
         (data (funcall data-f)))
    (--map
     (progn
       (insert (format "%s - %s\n" (funcall insert-f (car it) :height height) (car it)))
       (when duration (sit-for duration 0)))
     data)))

;; All the alist variables are prefixed with `all-the-icons-data/'

;;; Code:
(require 'font-lock+)

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