all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* [BUG] new cite: links not allowed at start of org heading [9.5 (9.5-gded97b @ c:/Users/scott/.emacs.d/straight/build/org/)]
@ 2021-11-12  6:14 Scott Otterson
  2022-10-20  3:26 ` Ihor Radchenko
  0 siblings, 1 reply; 2+ messages in thread
From: Scott Otterson @ 2021-11-12  6:14 UTC (permalink / raw)
  To: Emacs-orgmode@gnu.org

[-- Attachment #1: Type: text/plain, Size: 290079 bytes --]

If I make a new org heading, and put the cursor just after the space
following the last heading star, then the citar package won't create a new
style citation link; if I type C-c b, I get this error message in the
minibuffer:

user-error: Cannot insert a citation here

The author of citar tells me that this error comes from org, not the citar
package.

However, if I type a single visible character first, then C-c b works.  In
other words:

I can do this:

*** A [cite:@Kraskov04EstMutInfKNN]

I can't do this:

*** [cite:@Kraskov04EstMutInfKNN]

This is only true for the new cite links.  I can put org-ref links at the
start of a headline, as well as the old emacs bibtex links.

------------------------------------------------------------------------
Emacs  : GNU Emacs 27.2 (build 1, x86_64-w64-mingw32)
 of 2021-03-26
Package: Org mode version 9.5 (9.5-gded97b @
c:/Users/scott/.emacs.d/straight/build/org/)

current state:
==============
(setq
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
                     org-src-mode-configure-edit-buffer)
 org-capture-prepare-finalize-hook '(org-roam-capture--install-finalize-h)
 org-link-shell-confirm-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-appear-autoentities t
 org-roam-db-node-include-function #[0 "\300\207" [t] 1]
 org-table-header-line-p t
 org-refile-targets '((nil :maxlevel . 6))
 org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
 org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
                              (insert
                               (format "cite:%s\n"
                                (org-entry-get (point) "CUSTOM_ID"))
                               )
                              )
                             )
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-latex-pdf-process '("latexmk -pdf -output-directory=%o -f %f")
 org-persist-before-write-hook '(org-element--cache-persist-before-write)
 org-agenda-files '("~/OneDrive/share/ref/howto.org"
                    "c:/Users/scott/OneDrive/share/proj/roadmapFrcst/
forecast_roadmap.org" "c:/Users/scott/OneDrivef/energytop.org"
"c:/Users/scott/OneDrive/ref/DOE_brainstorm/20200605152244-test0.org"
"c:/Users/scott/OneDrive/ref/tmp.org")
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-ref-pdf-directory '("c:/Users/scott/OneDrive/share/ref/papers"

 "c:/Users/scott/OneDrive/share/ref/DOE_brainstorm/papers")
 org-modules '(ol-bibtex ol-info org-inlinetask org-mouse ol-eshell ol-man
               org-mouse org-protocol)
 org-cycle-include-plain-lists 'integrate
 org-mode-hook '(#[0
                   "\305\x10\306 >\203\x14\0\307\n\310\311#\210\307
\312\313#\210\307 \314\315#\210\306
>\203,\0\307\n\316\317#\210\307\n\320\321#\210\322 >\203>\0\307
\323\324#\210\307 \325\324#\210\326
>\203P\0\307\n\327\317#\210\307\n\330\321#\210\331
>\203_\0\332\311\f\333BC\334#\210\335 >\203k\0\332\311\336\334#\210\337
>\203w\0\332\311\340\334#\210\341\342\343\344\311$\210\345\342\311\"\210\342\207"
                   [org-mouse-context-menu-function

                    org-mouse-features

                    org-mouse-map

                    org-mode-map

                    org-outline-regexp

                    org-mouse-context-menu

                    context-menu

                    org-defkey

                    [mouse-3]

                    nil

                    [mouse-3]

                    org-mouse-show-context-menu

                    [down-mouse-1]

                    org-mouse-down-mouse

                    [C-drag-mouse-1]

                    org-mouse-move-tree

                    [C-down-mouse-1]

                    org-mouse-move-tree-start

                    yank-link

                    [S-mouse-2]

                    org-mouse-yank-link

                    [drag-mouse-3]

                    move-tree

                    [drag-mouse-3]

                    [down-mouse-3]

                    activate-stars

                    font-lock-add-keywords

                    (0















                     `(face org-link mouse-face highlight keymap
                       ,org-mouse-map)
















                     'prepend)

                    t

                    activate-bullets

                    (("^[ ]*\\([-+*]\\|[0-9]+[.)]\\) +"













                      (1






































                       `(face org-link keymap ,org-mouse-map mouse-face
highlight)






































                       'prepend)














                      )













                     )

                    activate-checkboxes

                    (("^[ ]*\\(?:[-+*]\\|[0-9]+[.)]\\)[
]+\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ ]*\\)?\\(\\[[- X]\\]\\)"








                      (1


























                       `(face nil keymap ,org-mouse-map mouse-face
highlight)


























                       prepend)








                      )







                     )

                    ad-add-advice

                    org-open-at-point

                    (org-mouse-open-at-point













                     nil













                     t













                     (advice












































































                      lambda












































































                      nil












































































                      (let









































































































































































































































































































































                       ((context


































































































































































































































































































































































































































































































































































































































































































































































                         (org-context)




























































































































































































































































































































































































































































































































































































































































































































































































                                                            )







































































































































































































































































































































































































































































































































































































































































                        )









































































































































































































































































































































                       (cond

























































































































































































































































































































































                        ((assq :headline-stars context)































































































































































































































































































































































































































































































































































































































































































































                         (org-cycle)































































































































































































































































































































































































































































































































































































































































































































                         )

























































































































































































































































































































































                        ((assq :checkbox context)

























































































































































































































































































































































                         (org-toggle-checkbox)

























































































































































































































































































































































                         )

























































































































































































































































































































































                        ((assq :item-bullet context)

























































































































































































































































































































































                         (let

























































































































































































































































































































































                          ((org-cycle-include-plain-lists t)































































































































































































































































































































































































































































































































































































































































































































                           )

























































































































































































































































































































































                          (org-cycle)

























































































































































































































































































































































                          )

























































































































































































































































































































































                         )

























































































































































































































































































































































                        ((org-footnote-at-reference-p)

























































































































































































































































































































































                         nil)

























































































































































































































































































































































                        (t ad-do-it)

























































































































































































































































































































































                        )









































































































































































































































































































































                       )












































































                      )













                     )

                    around ad-activate]
                   5]
                 org-ref-org-menu citar-filenotify-local-watches
                 wrap-region-mode org-autolist-mode org-appear-mode
                 org-superstar-mode
                 #[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
                 org-ref-setup-label-finders)
 org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
 org-cite-global-bibliography '("~/OneDrive/share/ref/energy.bib")
 org-yank-adjusted-subtrees t
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-outline-path-complete-in-steps nil
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-roam-capture-new-node-hook '(org-roam-protocol--insert-captured-ref-h)
 org-persist-before-read-hook '(org-element--cache-persist-before-read)
 org-superstar-headline-bullets-list '("●" "■" "○" "►" "•" "□" "▸" "▫" "▹")
 org-confirm-elisp-link-function 'yes-or-no-p
 org-appear-autolinks t
 org-ref-clean-bibtex-key-function '(lambda (key)
                                     (replace-regexp-in-string ":" "" key))
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-persist-after-read-hook '(org-element--cache-persist-after-read)
 org-bibtex-headline-format-function #[257 "\300\x01\236A\207" [:title] 3
"\n\n(fn ENTRY)"]
 org-ref-cite-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 lambda nil (interactive)
                        (funcall org-ref-open-pdf-function))
                       (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))
 org-cite-follow-processor 'citar
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-babel-pre-tangle-hook '(save-buffer)
 org-file-apps '(("\\.docx\\'" . default) ("\\.mm\\'" . default)
                 ("\\.x?html?\\'" . default) ("\\.pdf\\'" . default)
                 (auto-mode . emacs))
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe
                      org-babel-header-arg-expand)
 org-export-with-broken-links 'mark
 org-hide-leading-stars t
 org-ref-bibliography-notes
"c:/Users/scott/OneDrive/share/ref/DOE_brainstorm/DOE_brainstorm.org"
 org-ref-clean-bibtex-entry-hook '(org-ref-bibtex-format-url-if-doi
                                   orcb-key-comma org-ref-replace-nonascii
                                   orcb-& orcb-% org-ref-title-case-article
                                   orcb-clean-year orcb-key orcb-clean-doi
                                   orcb-clean-pages orcb-check-journal
                                   org-ref-sort-bibtex-entry
orcb-fix-spacing)
 org-roam-capture-preface-hook '(org-roam-dailies--override-capture-time-h
                                 org-roam-protocol--try-capture-to-ref-h)
 org-hide-emphasis-markers t
 org-export-backends '(ascii html latex odt org)
 org-roam-completion-everywhere t
 org-ref-insert-label-function 'org-ref-helm-insert-label-link
 org-font-lock-hook '(org-inlinetask-fontify)
 org-ref-open-pdf-function 'org-ref-open-pdf-at-point
 org-startup-align-all-tables t
 org-ascii-format-drawer-function #[771 "\x01\207" [] 4 "\n\n(fn NAME CONTENTS
WIDTH)"]
 org-ellipsis "…"
 org-superstar-todo-bullet-alist '(("TODO" . 9646) ("DONE" . 9647))
 org-ref-open-notes-function '(lambda nil (org-show-entry)
                               (outline-show-branches)
(outline-show-children)
                               (org-cycle '(64)) (recenter-top-bottom 0))
 org-agenda-loop-over-headlines-in-active-region nil
 org-occur-case-fold-search ''smart
 org-cite-insert-processor 'citar
 org-roam-find-file-hook '(org-roam-buffer--setup-redisplay-h
                           org-roam--register-completion-functions-h
                           org-roam--replace-roam-links-on-save-h
                           org-roam-open-id-with-org-roam-db-h
                           org-roam-db-autosync--setup-update-on-save-h)
 org-appear-autokeywords t
 org-occur-hook '(org-first-headline-recenter)
 org-agenda-mode-hook '(#[0
                          "\302\x10\303 \304\305#\210\303 \306\307#\210\303
\310\311#\210\303 \312\313#\210\303 \314\315#\207"
                          [org-mouse-context-menu-function

                           org-agenda-mode-map

                           org-mouse-agenda-context-menu

                           org-defkey

                           [mouse-3]

                           org-mouse-show-context-menu

                           [down-mouse-3]

                           org-mouse-move-tree-start

                           [C-mouse-4]

                           org-agenda-earlier

                           [C-mouse-5]

                           org-agenda-later

                           [drag-mouse-3]

                           #[257


 "\300\x01!\211\301\267\202\x15\0\302\303!\202\x16\0\304\303!\202\x16\0\305\207"

                             [org-mouse-get-gesture










                              #s










                              (hash-table







































                               size







































                               2







































                               test







































                               eq







































                               rehash-size







































                               1.5







































                               rehash-threshold







































                               0.8125







































                               purecopy







































                               t







































                               data







































                               (:left 9 :right 15)







































                               )











                              org-agenda-earlier 1 org-agenda-later nil]

                             4 "\n\n(fn EVENT)" "e"]

                           ]
                          4]
                        )
 outline-minor-mode-hook '(outshine--outline-minor-mode-hook outshine-mode)
 org-protocol-protocol-alist '(("org-roam-node" :protocol "roam-node"
                                :function org-roam-protocol-open-node)
                               ("org-roam-ref" :protocol "roam-ref"
:function
                                org-roam-protocol-open-ref)
                               )
 org-appear-autosubmarkers t
 org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
 org-ref-insert-link-function 'org-ref-helm-insert-cite-link
 org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
 org-pandoc-options-for-docx '((standalone))
 org-cycle-hook '(org-inlinetask-hide-tasks org-cycle-hide-archived-subtrees
                  org-cycle-hide-drawers org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-speed-command-hook '(org-speed-command-activate
                          org-babel-speed-command-activate)
 org-roam-node-annotation-function 'org-roam-node-read--annotation
 org-ref-default-bibliography
'("c:/Users/scott/OneDrive/share/ref/DOE_brainstorm/deepSolarDOE.bib"
"c:/Users/scott/OneDrive/share/ref/DOE_brainstorm/newTechAdoption/newTechAdoption.bib")
 org-id-method 'ts
 org-roam-ui-browser-function 'browse-url
 org-odt-format-inlinetask-function
'org-odt-format-inlinetask-default-function
 org-roam-ref-annotation-function 'org-roam-ref-read--annotation
 org-roam-dailies-directory "c:/Users/scott/tmp/daily"
 org-appear-delay 1
 org-ref-pdf-to-bibtex-function 'copy-file
 org-export-before-parsing-hook '(org-attach-expand-links
                                  org-ref-acronyms-before-parsing
                                  org-ref-glossary-before-parsing)
 org-font-lock-set-keywords-hook '(org-hidden-links-hook-function)
 org-confirm-shell-link-function 'yes-or-no-p
 org-link-parameters '(("attachment" :follow org-attach-follow :complete
                        org-attach-complete-link)
                       ("roam" :follow org-roam-link-follow-link)
                       ("man" :follow org-man-open :export org-man-export
                        :store org-man-store-link)
                       ("eshell" :follow org-eshell-open :store
                        org-eshell-store-link)
                       ("info" :follow org-info-open :export org-info-export
                        :store org-info-store-link)
                       ("bibtex" :follow org-bibtex-open :store
                        org-bibtex-store-link)
                       ("printindex" :follow org-ref-index :export
                        #[(path desc format)
                          "\b\301=\205 \0\300\302!\207"
                          [format latex "\\printindex"] 2]
                        )
                       ("index" :follow #[(path) "\301\b!\207" [path occur]
2]
                        :export
                        #[(path desc format)
                          "\b\302=\205\n\0\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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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))
                        )
                       ("citeyearpar" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citeyearpar :complete
                        org-citeyearpar-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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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 org-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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (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))
                        :store org-ref-bibtex-store-link)
                       ("Cref" :follow org-ref-ref-follow :export
                        org-ref-Cref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "Cref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("cref" :follow org-ref-ref-follow :export
                        org-ref-cref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "cref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("autoref" :follow org-ref-ref-follow :export
                        org-ref-autoref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "autoref"] 3]
                        :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
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "eqref"] 3]
                        :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
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "nameref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("pageref" :follow org-ref-ref-follow :export
                        #[(path desc format)
                          "\b\302\267\202\x10\0\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
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "pageref"] 3]
                        :help-echo org-ref-ref-help-echo)
                       ("ref" :follow org-ref-ref-follow :export
                        org-ref-ref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "ref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("label" :follow
                        #[(label)
                          "\302\b!\x19\303\304\305 \211\306U\204\x14\0
\307V\203\x18\0\310\202\x19\0\311#\302\b!\")\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)
                          "\b\302\267\202\x15\0\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)
                          "\212\bb\210\303 \x19\304\305!\x1ar\nq\210\306\216
c\210\307 \210\310 -\207"
                          [position

                           s

                           temp-buffer

                           org-ref-link-message

                           generate-new-buffer

                           " *temp*"

                           #[nil
















                             "\301\b!\205 \0\302\b!\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)
                          "\b\301=\205 \0\300\302!\207"
                          [format latex "\\listoftables"] 2]
                        )
                       ("list-of-figures" :follow org-ref-list-of-figures
                        :export
                        #[(keyword desc format)
                          "\b\301=\205 \0\300\302!\207"
                          [format latex "\\listoffigures"] 2]
                        )
                       ("addbibresource" :follow
org-ref-follow-addbibresource
                        :export
                        #[(keyword desc format)
                          "\b\302\267\202\x0f\0\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)
                          "\b\302=\204\f\0\b\303=\203\x11\0\300\304
\"\207\305\207"
                          [format keyword latex beamer
                           "\\bibliographystyle{%s}" ""]
                          3]
                        )
                       ("printbibliography" :follow
org-ref-open-bibliography
                        :export
                        #[(keyword desc format)
                          "\b\302\267\202\x0e\0\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)
                          "\212\bb\210\303 \x19\304\305!\x1ar\nq\210\306\216
c\210\307 \210\310 -\207"
                          [position

                           s

                           temp-buffer

                           org-ref-link-message

                           generate-new-buffer

                           " *temp*"

                           #[nil
















                             "\301\b!\205 \0\302\b!\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
\0\302\303\300A\x05#\207\302\304\x04\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
\0\302\303\300A\x05#\207\302\304\x04\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
\0\302\303\300A\x05#\207\302\304\x04\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
\0\302\303\300A\x05#\207\302\304\x04\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
\0\302\303\300A\x05#\207\302\304\x04\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
\0\302\303\300A\x05#\207\302\304\x04\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
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("acrshort" . "acrshort")

                           (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\0\301\302\x04\x04#\207\301\303\x04\"\207"
                          [(latex beamer) format "\\glslink{%s}{%s}" "%s"] 7
                          "\n\n(fn PATH DESC FORMAT)"]
                        )
                       ("glsdesc" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771

"\211\301>\203\f\0\302\303\300\x05#\207\302\304\x04\"\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\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["glssymbol"

                           (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\0\302\303\300\x05#\207\302\304\x04\"\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\0\302\303\300\x05#\207\302\304\x04\"\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\0\302\303\300\x05#\207\302\304\x04\"\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\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["gls"

                           (latex beamer)

                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("doi" :follow doi-link-menu :export
                        #[(doi desc format)
                          "\b\304\267\202 \0\300\305 \n
\206\x11\0\306\nP$\207\300\307 \n \206\x1e\0\306\nP$\207\310\207"
                          [format

                           doi-utils-dx-doi-org-url

                           doi

                           desc

                           #s

                           (hash-table












                            size












                            2












                            test












                            eq












                            rehash-size












                            1.5












                            rehash-threshold












                            0.8125












                            purecopy












                            t












                            data












                            (html 6 latex 19)












                            )

                           "<a href=\"%s%s\">%s</a>" "doi:"
"\\href{%s%s}{%s}" nil]
                          6]
                        )
                       ("zotero" :follow
                        (lambda (zpath)
                         (browse-url (format "zotero:%s" zpath)))
                        )
                       ("id" :follow org-id-open) ("file+sys")
("file+emacs")
                       ("shell" :follow org-link--open-shell)
                       ("news" :follow
                        #[514 "\301\300\302\x04Q\x02\"\207"
                          ["news" browse-url ":"] 6 "\n\n(fn URL ARG)"]
                        )
                       ("mailto" :follow
                        #[514 "\301\300\302\x04Q\x02\"\207"
                          ["mailto" browse-url ":"] 6 "\n\n(fn URL ARG)"]
                        )
                       ("https" :follow
                        #[514 "\301\300\302\x04Q\x02\"\207"
                          ["https" browse-url ":"] 6 "\n\n(fn URL ARG)"]
                        )
                       ("http" :follow
                        #[514 "\301\300\302\x04Q\x02\"\207"
                          ["http" browse-url ":"] 6 "\n\n(fn URL ARG)"]
                        )
                       ("ftp" :follow
                        #[514 "\301\300\302\x04Q\x02\"\207" ["ftp" browse-url ":"]
                          6 "\n\n(fn URL ARG)"]
                        )
                       ("help" :follow org-link--open-help :store
                        org-link--store-help)
                       ("file" :complete org-link-complete-file)
                       ("elisp" :follow org-link--open-elisp))
 org-latex-format-headline-function
'org-latex-format-headline-default-function
 org-link-elisp-confirm-function 'yes-or-no-p
 org-roam-db-autosync-mode t
 org-latex-format-inlinetask-function
'org-latex-format-inlinetask-default-function
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-superstar-special-todo-items t
 org-superstar-cycle-headline-bullets nil
 org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
 org-roam-directory "c:/Users/scott/tmp"
 org-html-format-headline-function
'org-html-format-headline-default-function
 org-superstar-item-bullet-alist '((42 . 10043) (43 . 10011) (45 . 9644))
 org-cite-activate-processor 'citar
 org-ref-cite-onclick-function 'org-ref-cite-click-helm
 org-directory "c:/Users/scott/OneDrive/share/ref/DOE_brainstorm/org-notes"
 org-link-from-user-regexp nil
 org-ref-notes-function 'org-ref-notes-function-one-file
 org-use-speed-commands t
 org-ctrl-k-protect-subtree 'error
 org-list-allow-alphabetical t
 )

[-- Attachment #2: Type: text/html, Size: 1556142 bytes --]

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: [BUG] new cite: links not allowed at start of org heading [9.5 (9.5-gded97b @ c:/Users/scott/.emacs.d/straight/build/org/)]
  2021-11-12  6:14 [BUG] new cite: links not allowed at start of org heading [9.5 (9.5-gded97b @ c:/Users/scott/.emacs.d/straight/build/org/)] Scott Otterson
@ 2022-10-20  3:26 ` Ihor Radchenko
  0 siblings, 0 replies; 2+ messages in thread
From: Ihor Radchenko @ 2022-10-20  3:26 UTC (permalink / raw)
  To: Scott Otterson; +Cc: Emacs-orgmode@gnu.org

Scott Otterson <scotto@sharpleaf.org> writes:

> If I make a new org heading, and put the cursor just after the space
> following the last heading star, then the citar package won't create a new
> style citation link; if I type C-c b, I get this error message in the
> minibuffer:
>
> user-error: Cannot insert a citation here
>
> The author of citar tells me that this error comes from org, not the citar
> package.
>
> However, if I type a single visible character first, then C-c b works.  In
> other words:
>
> I can do this:
>
> *** A [cite:@Kraskov04EstMutInfKNN]
>
> I can't do this:
>
> *** [cite:@Kraskov04EstMutInfKNN]

Thanks for reporting, and sorry for the late reply.
Fixed on main.
https://git.savannah.gnu.org/cgit/emacs/org-mode.git/commit/?id=3d1f4e0af0d98c57b720b9090e3a28fbffccafdf

-- 
Ihor Radchenko // yantar92,
Org mode contributor,
Learn more about Org mode at <https://orgmode.org/>.
Support Org development at <https://liberapay.com/org-mode>,
or support my work at <https://liberapay.com/yantar92>


^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2022-10-20  3:28 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2021-11-12  6:14 [BUG] new cite: links not allowed at start of org heading [9.5 (9.5-gded97b @ c:/Users/scott/.emacs.d/straight/build/org/)] Scott Otterson
2022-10-20  3:26 ` Ihor Radchenko

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.