[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/srht f349b575b8 2/5: srht-paste: Fix srht-paste--annot.

From: ELPA Syncer
Subject: [elpa] externals/srht f349b575b8 2/5: srht-paste: Fix srht-paste--annot.
Date: Mon, 6 Jun 2022 12:57:52 -0400 (EDT)

branch: externals/srht
commit f349b575b8b15571b53d3691a0c26469a05f252c
Author: Aleksandr Vityazev <avityazev@posteo.org>
Commit: Aleksandr Vityazev <avityazev@posteo.org>

    srht-paste: Fix srht-paste--annot.
    * lisp/srht-paste (srht-paste--annot): Remove the use of an unnecessary
    assoc function.
 lisp/srht-paste.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/srht-paste.el b/lisp/srht-paste.el
index c09535a5f0..973b223d45 100644
--- a/lisp/srht-paste.el
+++ b/lisp/srht-paste.el
@@ -74,7 +74,7 @@ For the existing PASTES for the DOMAIN domain name."
 (defun srht-paste--annot (domain str)
   "Function to add annotations in the completions buffer for STR and DOMAIN."
   (srht-annotation (seq _f created visibility)
-    (assoc str (srht-paste--candidates domain)) str))
+    (srht-paste--candidates domain) str))
 (defun srht-paste--sha (domain)
   "Read a FILENAME in the minibuffer, with completion and return SHA.

reply via email to

[Prev in Thread] Current Thread [Next in Thread]