remove lambda from extract-keys

emacs-citar · Sep 14, 2021 · 276af4c · 276af4c
1 parent 4947f64
commit 276af4c
Showing 1 changed file with 4 additions and 7 deletions.
diff --git a/bibtex-actions.el b/bibtex-actions.el
@@ -508,6 +508,10 @@ If FORCE-REBUILD-CACHE is t, force reload the cache."
     (when field
       (concat base-url (bibtex-actions-get-value field entry)))))
 
+(defun bibtex-actions--extract-keys (keys-entries)
+  "Extract list of keys from KEYS-ENTRIES alist."
+  (seq-map #'car keys-entries))
+
 ;;;###autoload
 (defun bibtex-actions-insert-preset ()
   "Prompt for and insert a predefined search."
@@ -760,12 +764,5 @@ With prefix, rebuild the cache before offering candidates."
       ;; FIX how?
       (bibtex-actions-run-default-action keys)))
 
-(defun bibtex-actions--extract-keys (keys-entries)
-  "Extract list of keys from KEYS-ENTRIES alist."
-  (seq-map
-   (lambda (key-entry)
-     (car key-entry))
-   keys-entries))
-
 (provide 'bibtex-actions)
 ;;; bibtex-actions.el ends here