From 82651be90975670fb7214cf2a91dba4064c6af0e Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 11 Sep 2018 20:09:31 -0400 Subject: [PATCH] Remove sharp-quote on make-hash-table :test 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. --- core/core-modules.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/core/core-modules.el b/core/core-modules.el index e5cde27e1..d3567fa31 100644 --- a/core/core-modules.el +++ b/core/core-modules.el @@ -40,7 +40,7 @@ non-nil." (load! "init" doom-private-dir t) (unless doom-modules - (setq doom-modules (make-hash-table :test #'equal))) + (setq doom-modules (make-hash-table :test 'equal))) (maphash (lambda (key plist) (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) (let ((noninteractive t) (doom-modules - (make-hash-table :test #'equal + (make-hash-table :test 'equal :size 20 :rehash-threshold 1.0)) doom-init-modules-p) @@ -274,7 +274,7 @@ for a list of all recognized module trees. Order defines precedence (from most to least)." (unless doom-modules (setq doom-modules - (make-hash-table :test #'equal + (make-hash-table :test 'equal :size (if modules (length modules) 100) :rehash-threshold 1.0))) (let (category m)