emacs
/
evil-collection
mirror of https://github.com/jojojames/evil-collection.git
1
0
Fork 0
Code Issues Releases Wiki Activity

Change name of evil-collection-bindings-record 

Use two dashes for internal variable
This commit is contained in:
Justin Burkett 2018-06-05 21:56:18 -04:00 committed by James N
parent 0a913f9df6
commit f9c38d26ea
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
evil-collection.el
View File

@ -179,7 +179,7 @@ This is a list of strings that are suitable for input to `kbd'."
: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
@ -201,11 +201,11 @@ compatibility.")
"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'."
`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
(record (gethash package evil-collection--bindings-record
(make-hash-table :test 'equal))))
(while bindings
(let ((key (pop bindings))
@ -219,7 +219,7 @@ Filter keys on the basis of `evil-collection-key-whitelist' and
(error
(message "evil-collection: Bad binding %s"
'(evil-define-key* ',state ,map-sym ,key ',def))))))))
(puthash package record evil-collection-bindings-record)))
(puthash package record evil-collection--bindings-record)))
(defun evil-collection-describe-all-bindings ()
"Print bindings made by Evil Collection to separate buffer."
@ -244,7 +244,7 @@ Filter keys on the basis of `evil-collection-key-whitelist' and
(insert (format "| %s | %S |\n" (key-description key) def))))
bindings)
(org-table-align))
evil-collection-bindings-record))))
evil-collection--bindings-record))))
(defun evil-collection--translate-key (state keymap-symbol
translations