diff --git a/blow.el b/blow.el index 15cfd75956..974f745d6b 100644 --- a/blow.el +++ b/blow.el @@ -93,7 +93,7 @@ (defun blow--set-mode-list (symbol value) "Set SYMBOL's default value to VALUE, SYMBOL should be `blow-mode-list'." - (set-default symbol value) + (set-default symbol value) ;perhaps `custom-set-default' would be better? (when blow-mode (blow--setup-all-buffers))) @@ -111,12 +111,12 @@ Don't modify this variable from Lisp programs, use `blow' instead." (sexp :tag "Mode line template"))) :set #'blow--set-mode-list) -(defvar blow--original-lighters nil +(defvar blow--original-lighters nil ;why isn't the value initialised? "Hash table of modes and their original lighters or nil.") (defun blow--hash-exists-p (key table) "Return t if KEY is in hash table TABLE." - (let ((default (make-symbol "blow--nonexistant"))) + (let ((default (make-symbol "blow--nonexistant"))) ;the prefix is not necessary, the symbol isn't interned anyway (not (eq (gethash key table default) default)))) (defun blow--puthash-unless-exists (key value table)