From d5d33e56f3839f95aa9ecafcb71d8c8871a7d8c4 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Wed, 20 Jan 2016 01:47:11 -0500 Subject: bog-clear-citekey-cache: Cosmetics --- bog.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bog.el b/bog.el index 2af27c3..2187470 100644 --- a/bog.el +++ b/bog.el @@ -305,8 +305,8 @@ Otherwise, prompt for CATEGORY." (mapcar (lambda (c) (symbol-name (car c))) bog--citekey-cache))))))) (setq bog--citekey-cache - (unless (eq category t) - (assq-delete-all category bog--citekey-cache)))) + (and (not (eq category t)) + (assq-delete-all category bog--citekey-cache)))) (defvar bog--no-sort nil) (defun bog--maybe-sort (values) -- cgit v1.2.3