[elpa] externals/marginalia 051bddf304: Check if bookmark-alist exists (Fix #134)

[ELPA Syncer]

branch: externals/marginalia
commit 051bddf304c8bae7a7dc5f4fdf6e741ce7d73246
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Check if bookmark-alist exists (Fix #134)
---
 marginalia.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/marginalia.el b/marginalia.el
index 136ae13075..419194b389 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -704,7 +704,7 @@ keybinding since CAND includes it."
 
 (defun marginalia-annotate-package (cand)
   "Annotate package CAND with its description summary."
-  (when-let* ((pkg-alist (and (bound-and-true-p package-alist) package-alist))
+  (when-let* ((pkg-alist (bound-and-true-p package-alist))
               (pkg (intern-soft (replace-regexp-in-string 
"-[[:digit:]\\.-]+\\'" "" cand)))
               ;; taken from `describe-package-1'
               (desc (or (car (alist-get pkg pkg-alist))
@@ -737,7 +737,7 @@ The string is transformed according to 
`marginalia-bookmark-type-transformers'."
 
 (defun marginalia-annotate-bookmark (cand)
   "Annotate bookmark CAND with its file name and front context string."
-  (when-let ((bm (assoc cand bookmark-alist)))
+  (when-let ((bm (assoc cand (bound-and-true-p bookmark-alist))))
     (let ((front (bookmark-get-front-context-string bm)))
       (marginalia--fields
        ((marginalia--bookmark-type bm) :width 10 :face 'marginalia-type)