[BUG] org-fill-paragraph unexpectedly creates list items [9.5.3 (9.5.3-g69c588 @ /Users/james/.emacs.d/elpa/org-9.5.3/)]

[J . P . Ascher]

Hi!

This is a bug that I fixed locally, but I'm not up to speed on
contributions or your code style, and your code base is fairly
complicated.

I contribute my solution in case it would be of broader use.

Problem:
========

Filling a line at an certain words, i.e. 1. J. P. etc., unexpectedly creates a 
new
list item in the exported document

Example:
========

`One two three four five six seven eight nine ten eleven twelve thirteen 1. 
fourteen`

Filling that line with fill-column 72 results in:

`One two three four five six seven eight nine ten eleven twelve thirteen
1. fourteen`

With a line break between "thirteen" and "1.", thus, 1. begins a line.
When exporting, this creates a list item of "fourteen".

Another example, with ox-pandoc (I believe pandoc is slightly more
capacious in its list definitions) this will also trigger a new line: 

`One two three four five six seven eight nine ten eleven twelve thirteen A. 
fourteen`

Filling with fill-column 72 results in:

`One two three four five six seven eight nine ten eleven twelve thirteen
A. fourteen`


Solution:
=========

Mine can be seen on org-mode-hook below, but I just added this code to my init 
file.

```
;; prevent breaking to make lists

(defun jpsa/org-fill-item-nobreak-p ()
  "Non-nil when a new line at point would create a new list."
  (looking-at-p "[ \t]*.\\{1,2\\}[.)]\\(?:$\\| \\)"))

(add-hook 'org-mode-hook
      (lambda ()
        "Prevent breaking lines creating new list items." 
              (add-to-list 'fill-nobreak-predicate 
'jpsa/org-fill-item-nobreak-p)))
```

Respectfully submitted!

Emacs  : GNU Emacs 28.1 (build 1, aarch64-apple-darwin21.4.0, NS appkit-2113.40 
Version 12.3.1 (Build 21E258))
 of 2022-04-27
Package: Org mode version 9.5.3 (9.5.3-g69c588 @ 
/Users/james/.emacs.d/elpa/org-9.5.3/)

current state:
==============
(setq
 org-link-elisp-confirm-function 'yes-or-no-p
 org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn 
ENTRY)"]
 org-agenda-files '("/Users/james/Library/Mobile 
Documents/com~apple~CloudDocs/org/notes.org")
 org-export-before-parsing-hook '(org-attach-expand-links)
 org-link-descriptive nil
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS 
WIDTH)"]
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers 
org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-link-from-user-regexp "\\<jpa4q@virginia\\.edu\\>\\|\\<James P\\. 
Ascher\\>"
 org-mode-hook '((closure (t) nil "Prevent breaking lines to create new list 
items."
                  (add-to-list 'fill-nobreak-predicate 
'jpsa/org-fill-item-nobreak-p))
                 (closure (t) nil (local-set-key "\357" 
'org-mime-org-subtree-htmlize))
                 (closure (t) nil (add-hook 'before-save-hook 
#'jpsa/org-update-cookies-buffer-now nil t))
                 (closure (t) nil (local-unset-key (kbd "C-c ]")))
                 #[0 "\300\301\302\303\304$\207" [add-hook 
change-major-mode-hook org-show-all append local] 5]
                 #[0 "\300\301\302\303\304$\207"
                   [add-hook change-major-mode-hook org-babel-show-result-all 
append local] 5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes
                 #[0 "\301\211\207" [imenu-create-index-function 
org-imenu-get-tree] 2])
 org-babel-load-languages '((dot . t) (emacs-lisp . t) (gnuplot . t) (shell . 
t))
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-bookmark-names-plist '(:last-capture "org-capture-last-stored" 
:last-capture-marker
                            "org-capture-last-stored-marker")
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 outline-isearch-open-invisible-function 'outline-isearch-open-invisible
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer 
org-src-mode-configure-edit-buffer)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-pandoc-epub-rights "Copyright 2022 James P. Ascher <jpa4q@virginia.edu>"
 org-mime-src-mode-hook '(org-mime-src-mode-configure-edit-buffer)
 org-pretty-entities t
 org-fontify-whole-heading-line t
 org-speed-command-hook '(org-speed-command-activate 
org-babel-speed-command-activate)
 org-html-format-inlinetask-function 
'org-html-format-inlinetask-default-function
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-latex-format-inlinetask-function 
'org-latex-format-inlinetask-default-function
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe 
org-babel-header-arg-expand)
 org-link-shell-confirm-function 'yes-or-no-p
 org-babel-pre-tangle-hook '(save-buffer)
 org-agenda-loop-over-headlines-in-active-region nil
 org-occur-hook '(org-first-headline-recenter)
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-link-parameters '(("attachment" :follow org-attach-follow :complete 
org-attach-complete-link)
                       ("id" :follow org-id-open) ("eww" :follow org-eww-open 
:store org-eww-store-link)
                       ("rmail" :follow org-rmail-open :store 
org-rmail-store-link)
                       ("mhe" :follow org-mhe-open :store org-mhe-store-link)
                       ("irc" :follow org-irc-visit :store org-irc-store-link 
:export org-irc-export)
                       ("info" :follow org-info-open :export org-info-export 
:store org-info-store-link)
                       ("gnus" :follow org-gnus-open :store org-gnus-store-link)
                       ("docview" :follow org-docview-open :export 
org-docview-export :store org-docview-store-link)
                       ("bbdb" :follow org-bbdb-open :export org-bbdb-export 
:complete org-bbdb-complete-link :store
                        org-bbdb-store-link)
                       ("w3m" :store org-w3m-store-link)
                       ("mu4e" :follow mu4e-org-open :export nil :store 
mu4e-org-store-link)
                       ("printindex" :follow org-ref-index :export
                        #[(path desc format) "\301=\205        \300\302!\207" 
[format latex "\\printindex"] 2])
                       ("index" :follow #[(path) "\301!\207" [path occur] 2] 
:export
                        #[(path desc format) "\302=\205\n\300\303      \"\207" 
[format path latex "\\index{%s}"] 3])
                       ("bibentry" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-bibentry :complete 
org-bibentry-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Autocites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Autocites :complete 
org-Autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("autocites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-autocites :complete 
org-autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("supercites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-supercites :complete 
org-supercites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Textcites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Textcites :complete 
org-Textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("textcites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-textcites :complete 
org-textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Smartcites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Smartcites :complete 
org-Smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("smartcites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-smartcites :complete 
org-smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("footcitetexts" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcitetexts :complete 
org-footcitetexts-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("footcites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcites :complete 
org-footcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Parencites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Parencites :complete 
org-Parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("parencites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-parencites :complete 
org-parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Cites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Cites :complete org-Cites-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("cites" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-cites :complete org-cites-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("fnotecite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-fnotecite :complete 
org-fnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Pnotecite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Pnotecite :complete 
org-Pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("pnotecite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-pnotecite :complete 
org-pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Notecite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Notecite :complete 
org-Notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("notecite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-notecite :complete 
org-notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("footfullcite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footfullcite :complete 
org-footfullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("fullcite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-fullcite :complete 
org-fullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citeurl" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeurl :complete 
org-citeurl-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citedate*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citedate* :complete 
org-citedate*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citedate" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citedate :complete 
org-citedate-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citetitle*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citetitle* :complete 
org-citetitle*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citetitle" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citetitle :complete 
org-citetitle-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Citeauthor*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citeauthor* :complete 
org-Citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Autocite*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Autocite* :complete 
org-Autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("autocite*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-autocite* :complete 
org-autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Autocite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Autocite :complete 
org-Autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("autocite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-autocite :complete 
org-autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("supercite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-supercite :complete 
org-supercite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("parencite*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-parencite* :complete 
org-parencite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("cite*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-cite* :complete org-cite*-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Smartcite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Smartcite :complete 
org-Smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("smartcite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-smartcite :complete 
org-smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Textcite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Textcite :complete 
org-Textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("textcite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-textcite :complete 
org-textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("footcitetext" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcitetext :complete 
org-footcitetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("footcite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcite :complete 
org-footcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Parencite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Parencite :complete 
org-Parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("parencite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-parencite :complete 
org-parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Cite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Cite :complete org-Cite-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Citeauthor" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citeauthor :complete 
org-Citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Citealp" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citealp :complete 
org-Citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Citealt" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citealt :complete 
org-Citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Citep" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citep :complete org-Citep-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("Citet" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citet :complete org-Citet-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citeyear*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeyear* :complete 
org-citeyear*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citeyear" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeyear :complete 
org-citeyear-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citeauthor*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeauthor* :complete 
org-citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citeauthor" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeauthor :complete 
org-citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citetext" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citetext :complete 
org-citetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citenum" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citenum :complete 
org-citenum-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citealp*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealp* :complete 
org-citealp*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citealp" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealp :complete 
org-citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citealt*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealt* :complete 
org-citealt*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citealt" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealt :complete 
org-citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citep*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citep* :complete 
org-citep*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citep" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citep :complete org-citep-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citet*" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citet* :complete 
org-citet*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("citet" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citet :complete org-citet-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("nocite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-nocite :complete 
org-nocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("cite" :follow (lambda (_) (funcall 
org-ref-cite-onclick-function nil)) :export
                        org-ref-format-cite :complete org-cite-complete-link 
:help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry 
(org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) 
(buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :store 
org-ref-bibtex-store-link :keymap
                        (keymap (tab lambda nil (interactive) (funcall 
org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) 
(org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) 
(org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . 
org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the 
killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." 
(interactive)
                          (kill-new (org-element-property :path 
(org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car 
(org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" 
(interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . 
org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . 
org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . 
org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . 
mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . 
org-open-at-mouse))
                        )
                       ("autoref" :follow org-ref-ref-follow :export 
org-ref-autoref-export :complete
                        org-ref-complete-link :face org-ref-ref-face-fn 
:help-echo org-ref-ref-help-echo)
                       ("eqref" :follow org-ref-ref-follow :export 
org-ref-eqref-export :complete
                        org-ref-complete-link :face org-ref-ref-face-fn 
:help-echo org-ref-ref-help-echo)
                       ("nameref" :follow org-ref-ref-follow :export 
org-ref-export-nameref :complete
                        org-ref-complete-link :face org-ref-ref-face-fn 
:help-echo org-ref-ref-help-echo)
                       ("pageref" :follow org-ref-ref-follow :export
                        #[(path desc format) "\302\267\202\300\303    
\"\207\300\304  \"\207\305\207"
                          [format path #s
                           (hash-table size 2 test eq rehash-size 1.5 
rehash-threshold 0.8125 purecopy t data
                            (html 6 latex 11))
                           "(<pageref>%s</pageref>)" "\\pageref{%s}" nil]
                          3]
                        :face org-ref-ref-face-fn :complete 
org-pageref-complete-link :help-echo
                        org-ref-ref-help-echo)
                       ("ref" :follow org-ref-ref-follow :export 
org-ref-ref-export :complete org-ref-complete-link
                        :face org-ref-ref-face-fn :help-echo 
org-ref-ref-help-echo)
                       ("label" :follow
                        #[(label)
                          "\302!\303\304\305   \211\306U\204  
\307V\203\310\202\311#\302!\")\207"
                          [label count org-ref-count-labels message format "%s 
occurence%s" 0 1 "s" ""] 6
                          "On clicking count the number of label tags used in 
the buffer.\nA number greater than one means multiple labels!"]
                        :export
                        #[(keyword desc format)
                          "\302\267\202\300\303       \"\207\300\304  
\"\207\300\305  \"\207\306\207"
                          [format keyword #s
                           (hash-table size 3 test eq rehash-size 1.5 
rehash-threshold 0.8125 purecopy t data
                            (html 6 md 11 latex 16))
                           "<div id=\"%s\"></div>" "<a name=\"%s\"></a>" 
"\\label{%s}" nil]
                          3]
                        :store org-ref-label-store-link :face 
org-ref-label-face-fn :help-echo
                        #[(window object position)
                          "\212b\210\303 \304\305!r\nq\210\306\216     
c\210\307 \210\310 -\207"
                          [position s temp-buffer org-ref-link-message 
generate-new-buffer " *temp*"
                           #[nil "\301!\205    \302!\207" [temp-buffer 
buffer-name kill-buffer] 2]
                           fill-paragraph buffer-string]
                          2]
                        )
                       ("list-of-tables" :follow org-ref-list-of-tables :export
                        #[(keyword desc format) "\301=\205     \300\302!\207" 
[format latex "\\listoftables"] 2])
                       ("list-of-figures" :follow org-ref-list-of-figures 
:export
                        #[(keyword desc format) "\301=\205     \300\302!\207" 
[format latex "\\listoffigures"] 2])
                       ("addbibresource" :follow org-ref-follow-addbibresource 
:export
                        #[(keyword desc format) 
"\302\267\202\300\303!\207\300\304    \"\207\305\207"
                          [format keyword #s
                           (hash-table size 2 test eq rehash-size 1.5 
rehash-threshold 0.8125 purecopy t data
                            (html 6 latex 10))
                           "" "\\addbibresource{%s}" nil]
                          3]
                        )
                       ("bibliographystyle" :export
                        #[(keyword desc format) 
"\302=\204\f\303=\203\300\304        \"\207\305\207"
                          [format keyword latex beamer 
"\\bibliographystyle{%s}" ""] 3]
                        )
                       ("printbibliography" :follow org-ref-open-bibliography 
:export
                        #[(keyword desc format) "\302\267\202\303 \207\304 
\207       \207\305\207"
                          [format org-ref-printbibliography-cmd #s
                           (hash-table size 3 test eq rehash-size 1.5 
rehash-threshold 0.8125 purecopy t data
                            (org 6 html 9 latex 12))
                           org-ref-get-org-bibliography 
org-ref-get-html-bibliography nil]
                          2]
                        )
                       ("nobibliography" :follow org-ref-open-bibliography 
:export org-ref-nobibliography-format)
                       ("bibliography" :follow org-ref-open-bibliography 
:export org-ref-bibliography-format
                        :complete org-bibliography-complete-link :help-echo
                        #[(window object position)
                          "\212b\210\303 \304\305!r\nq\210\306\216     
c\210\307 \210\310 -\207"
                          [position s temp-buffer org-ref-link-message 
generate-new-buffer " *temp*"
                           #[nil "\301!\205    \302!\207" [temp-buffer 
buffer-name kill-buffer] 2]
                           fill-paragraph buffer-string]
                          2]
                        :face org-ref-bibliography-face-fn)
                       ("Acp" :follow or-follow-acronym :face 
org-ref-acronym-face-fn :help-echo or-acronym-tooltip
                        :export
                        #[771 
"\211\301>\203\302\303\300A#\207\302\304\226\"\207"
                          [("Acp" . "Glspl") (latex beamer) format "\\%s{%s}" 
"%s"] 7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acp" :follow or-follow-acronym :face 
org-ref-acronym-face-fn :help-echo or-acronym-tooltip
                        :export
                        #[771 
"\211\301>\203\302\303\300A#\207\302\304\226\"\207"
                          [("acp" . "glspl") (latex beamer) format "\\%s{%s}" 
"%s"] 7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Ac" :follow or-follow-acronym :face 
org-ref-acronym-face-fn :help-echo or-acronym-tooltip
                        :export
                        #[771 
"\211\301>\203\302\303\300A#\207\302\304\226\"\207"
                          [("Ac" . "Gls") (latex beamer) format "\\%s{%s}" 
"%s"] 7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("ac" :follow or-follow-acronym :face 
org-ref-acronym-face-fn :help-echo or-acronym-tooltip
                        :export
                        #[771 
"\211\301>\203\302\303\300A#\207\302\304\226\"\207"
                          [("ac" . "gls") (latex beamer) format "\\%s{%s}" 
"%s"] 7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrfull" :follow or-follow-acronym :face 
org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771 
"\211\301>\203\302\303\300A#\207\302\304\226\"\207"
                          [("acrfull" . "acrfull") (latex beamer) format 
"\\%s{%s}" "%s"] 7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrlong" :follow or-follow-acronym :face 
org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771 
"\211\301>\203\302\303\300A#\207\302\304\226\"\207"
                          [("acrlong" . "acrlong") (latex beamer) format 
"\\%s{%s}" "%s"] 7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrshort" :follow or-follow-acronym :face 
org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771 
"\211\301>\203\302\303\300A#\207\302\304\226\"\207"
                          [("acrshort" . "acrshort") (latex beamer) format 
"\\%s{%s}" "%s"] 7
                          "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glsdesc" :follow or-follow-glossary :face 
org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["glsdesc" (latex beamer) format "\\%s{%s}" "%s"] 7 
"\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glssymbol" :follow or-follow-glossary :face 
org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["glssymbol" (latex beamer) format "\\%s{%s}" "%s"] 7 
"\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glslink" :follow or-follow-glossary :face 
org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\300>\203\f\301\302#\207\301\303\"\207"
                          [(latex beamer) format "\\glslink{%s}{%s}" "%s"] 7 
"\n\n(fn PATH DESC FORMAT)"]
                        )
                       ("Glspl" :follow or-follow-glossary :face 
org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["Glspl" (latex beamer) format "\\%s{%s}" "%s"] 7 
"\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Gls" :follow or-follow-glossary :face 
org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["Gls" (latex beamer) format "\\%s{%s}" "%s"] 7 
"\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glspl" :follow or-follow-glossary :face 
org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["glspl" (latex beamer) format "\\%s{%s}" "%s"] 7 
"\n\n(fn PATH _ FORMAT)"]
                        )
                       ("gls" :follow or-follow-glossary :face 
org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["gls" (latex beamer) format "\\%s{%s}" "%s"] 7 
"\n\n(fn PATH _ FORMAT)"]
                        )
                       ("bibtex" :follow org-bibtex-open :store 
org-bibtex-store-link) ("file+sys") ("file+emacs")
                       ("doi" :follow org-link-doi-open :export 
org-link-doi-export)
                       ("elisp" :follow org-link--open-elisp) ("file" :complete 
org-link-complete-file)
                       ("ftp" :follow #[514 "\301\300\302Q\"\207" ["ftp" 
browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("help" :follow org-link--open-help :store 
org-link--store-help)
                       ("http" :follow #[514 "\301\300\302Q\"\207" ["http" 
browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("https" :follow
                        #[514 "\301\300\302Q\"\207" ["https" browse-url ":"] 6 
"\n\n(fn URL ARG)"])
                       ("mailto" :follow
                        #[514 "\301\300\302Q\"\207" ["mailto" browse-url ":"] 6 
"\n\n(fn URL ARG)"])
                       ("message" :follow (lambda (path) (browse-url (concat 
"message:" path))))
                       ("news" :follow #[514 "\301\300\302Q\"\207" ["news" 
browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("shell" :follow org-link--open-shell))
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-metaup-hook '(org-babel-load-in-session-maybe)
 )
-- 
J. P. Ascher
  Durham, NC
  Preceding: doi.org/10.18130/jqpe-zc65
  Next: bibsoc.org.uk/content/2020-2021-0