emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Remove sharp-quote on make-hash-table :test

Browse source 
The function isn't really expecting a function, but the 'eq, 'eql or
'equal symbols. User supplied test/hash functions must be defined with
define-hash-table-test.
This commit is contained in:
Henrik Lissner 2018-09-11 20:09:31 -04:00
parent 8575ddc136
commit 82651be909
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
core/core-modules.el
View file

@ -40,7 +40,7 @@ non-nil."
(load! "init" doom-private-dir t) (load! "init" doom-private-dir t)
(unless doom-modules (unless doom-modules
(setq doom-modules (make-hash-table :test #'equal))) (setq doom-modules (make-hash-table :test 'equal)))
(maphash (lambda (key plist) (maphash (lambda (key plist)
(let ((doom--current-module key) (let ((doom--current-module key)
@ -175,7 +175,7 @@ non-nil, return paths of possible modules, activated or otherwise."
(or (unless refresh-p doom-modules) (or (unless refresh-p doom-modules)
(let ((noninteractive t) (let ((noninteractive t)
(doom-modules (doom-modules
(make-hash-table :test #'equal (make-hash-table :test 'equal
:size 20 :size 20
:rehash-threshold 1.0)) :rehash-threshold 1.0))
doom-init-modules-p) doom-init-modules-p)
@ -274,7 +274,7 @@ for a list of all recognized module trees. Order defines precedence (from most
to least)." to least)."
(unless doom-modules (unless doom-modules
(setq doom-modules (setq doom-modules
(make-hash-table :test #'equal (make-hash-table :test 'equal
:size (if modules (length modules) 100) :size (if modules (length modules) 100)
:rehash-threshold 1.0))) :rehash-threshold 1.0)))
(let (category m) (let (category m)