   :type '(repeat string)
   :group 'evil-collection)
 
-(defvar evil-collection-bindings-record (make-hash-table :test 'eq)
+(defvar evil-collection--bindings-record (make-hash-table :test 'eq)
   "Record of bindings currently made by Evil Collection. This is
 a hash-table with the package symbol as a key. The associated
 values are the package's bindings which are stored as a hash-table with key

  "Wrapper for `evil-define-key*' with additional features.
Filter keys on the basis of `evil-collection-key-whitelist' and
`evil-collection-key-blacklist'. Store bindings in
`evil-collection-bindings-record'."
  (declare (indent defun))
  (let* ((whitelist (mapcar 'kbd evil-collection-key-whitelist))
         (blacklist (mapcar 'kbd evil-collection-key-blacklist))
         (record (gethash package evil-collection-bindings-record
                          (make-hash-table :test 'equal))))
    (while bindings
      (let ((key (pop bindings))

              (insert (format "| %s | %S |\n" (key-description key) def))))
          bindings)
         (org-table-align))
       evil-collection--bindings-record))))

(defun evil-collection--translate-key (state keymap-symbol
                                             translations
