emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* [BUG] Org V 9.5 error when ~/.cache doesn't exist [9.5 (9.5-gd4e192 @ c:/Users/scott/.emacs.d/straight/build/org/)]
@ 2021-10-31 19:18 Scott Otterson
  2021-11-01 11:29 ` Ihor Radchenko
  0 siblings, 1 reply; 15+ messages in thread
From: Scott Otterson @ 2021-10-31 19:18 UTC (permalink / raw)
  To: Emacs-orgmode@gnu.org

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

Apparently, org version 9.5 expects the directory "~/.cache" to exist, and
if it doesn't, it terminates with an error.  I'd suggest that org mode
makes this directory if it needs it.

After I updated to org version 9.5, I wasn't able to export latex.  When I
ran "M-x org-export-dispatch l o", I saw the following error in my
minibuffer:

"Creating directory: No such file or directory,
c:/Users/scott/.cache/org-persist/"

And yes, that directory didn't exist, nor did its parent,
"c:/Users/scott/.cache".

After I made an empty "c:/Users/scott/.cache" then org-mode was able to
make "c:/Users/scott/.cache/org-perist" and carry on.

------------------------------------------------------------------------
Emacs  : GNU Emacs 27.2 (build 1, x86_64-w64-mingw32)
 of 2021-03-26
Package: Org mode version 9.5 (9.5-gd4e192 @
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-link-shell-confirm-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-appear-autoentities t
 org-table-header-line-p t
 org-refile-targets '((nil :maxlevel . 6))
 org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
 org-noter-auto-save-last-location t
 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-download-annotate-function 'org-download-annotate-default
 org-persist-before-write-hook '(org-element--cache-persist-before-write)
 org-agenda-files '("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 wrap-region-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-autolist-mode org-appear-mode
org-ref-setup-label-finders)
 org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
 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-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-noter-doc-property-in-notes t
 org-download-file-format-function 'org-download-file-format-default
 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-noter-notes-search-path
'("c:/Users/scott/OneDrive/share/ref/DOE_brainstorm/org-notes")
 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-download-method 'org-download-method-dirname-from-orgfile
 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-pandoc-options-for-beamer-pdf '((latex-engine . "lualatex"))
 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-hide-emphasis-markers t
 org-export-backends '(ascii html latex odt org)
 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-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-noter-notes-window-location 'other-frame
 org-noter-hide-other nil
 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-odd-levels-only t
 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-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-odt-format-inlinetask-function
'org-odt-format-inlinetask-default-function
 org-appear-delay 1
 org-ref-pdf-to-bibtex-function 'copy-file
 org-export-before-parsing-hook '(org-ref-acronyms-before-parsing
                                  org-ref-glossary-before-parsing
                                  org-attach-expand-links)
 org-font-lock-set-keywords-hook '(org-hidden-links-hook-function)
 org-confirm-shell-link-function 'yes-or-no-p
 org-link-parameters '(("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)))
                        )
                       ("attachment" :follow org-attach-follow :complete
                        org-attach-complete-link)
                       ("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-noter-always-create-frame nil
 org-latex-format-headline-function
'org-latex-format-headline-default-function
 org-link-elisp-confirm-function 'yes-or-no-p
 org-pandoc-options-for-latex-pdf '((latex-engine . "lualatex"))
 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-html-format-headline-function
'org-html-format-headline-default-function
 org-superstar-item-bullet-alist '((42 . 10043) (43 . 10011) (45 . 9644))
 org-ref-cite-onclick-function 'org-ref-cite-click-helm
 org-directory "c:/Users/scott/OneDrive/share/ref/DOE_brainstorm/org-notes"
 org-download-link-format-function
'org-download-link-format-function-default
 org-link-from-user-regexp nil
 org-ref-notes-function 'org-ref-notes-function-one-file
 org-use-speed-commands t
 org-download-abbreviate-filename-function 'file-relative-name
 org-ctrl-k-protect-subtree 'error
 org-list-allow-alphabetical t
 )

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

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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist [9.5 (9.5-gd4e192 @ c:/Users/scott/.emacs.d/straight/build/org/)]
  2021-10-31 19:18 [BUG] Org V 9.5 error when ~/.cache doesn't exist [9.5 (9.5-gd4e192 @ c:/Users/scott/.emacs.d/straight/build/org/)] Scott Otterson
@ 2021-11-01 11:29 ` Ihor Radchenko
  2021-11-01 15:44   ` [BUG] Org V 9.5 error when ~/.cache doesn't exist Max Nikulin
  0 siblings, 1 reply; 15+ messages in thread
From: Ihor Radchenko @ 2021-11-01 11:29 UTC (permalink / raw)
  To: Scott Otterson; +Cc: Emacs-orgmode@gnu.org

Scott Otterson <scotto@sharpleaf.org> writes:

> Apparently, org version 9.5 expects the directory "~/.cache" to exist, and
> if it doesn't, it terminates with an error.  I'd suggest that org mode
> makes this directory if it needs it.

Thanks for reporting! Fixed in 6621ee32e.

Best,
Ihor


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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-01 11:29 ` Ihor Radchenko
@ 2021-11-01 15:44   ` Max Nikulin
  2021-11-01 16:30     ` Ihor Radchenko
  2021-11-02 10:55     ` Ihor Radchenko
  0 siblings, 2 replies; 15+ messages in thread
From: Max Nikulin @ 2021-11-01 15:44 UTC (permalink / raw)
  To: emacs-orgmode

On 01/11/2021 18:29, Ihor Radchenko wrote:
> Scott Otterson writes:
> 
>> Apparently, org version 9.5 expects the directory "~/.cache" to exist, and
>> if it doesn't, it terminates with an error.  I'd suggest that org mode
>> makes this directory if it needs it.
> 
> Thanks for reporting! Fixed in 6621ee32e.

Ihor, your fix affects linux as well. .cache directory may be missed in 
fresh accounts. E.g. I just have created a new test container (my old 
one has emacs-25):

emacs --batch -L org-mode/lisp/ -l org-persist  --eval '(message 
"%s\n%s" org-persist-directory (org-version nil t))'

Loading /etc/emacs/site-start.d/00debian.el (source)...
/home/ubuntu/.emacs.d/org-persist/
Org mode version 9.5 (release_9.5-194-g7a6f48 @ /home/ubuntu/org-mode/lisp/)

P.S. ~/.cache directory should not be world-readable, so likely it is 
required to change umask or to explicitly specify permissions while 
creating it.



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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-01 15:44   ` [BUG] Org V 9.5 error when ~/.cache doesn't exist Max Nikulin
@ 2021-11-01 16:30     ` Ihor Radchenko
  2021-11-01 16:31       ` Ihor Radchenko
  2021-11-02 10:55     ` Ihor Radchenko
  1 sibling, 1 reply; 15+ messages in thread
From: Ihor Radchenko @ 2021-11-01 16:30 UTC (permalink / raw)
  To: Max Nikulin; +Cc: emacs-orgmode

Max Nikulin <manikulin@gmail.com> writes:

> Ihor, your fix affects linux as well. .cache directory may be missed in 
> fresh accounts. E.g. I just have created a new test container (my old 
> one has emacs-25):

You are right. Though creating .cache dir is probably a job for xdg.el,
not Org. XDG spec prescribes specific permissions for the XDG
directories. I would prefer to send a bug report/feature request to
Emacs core rather than fixing this scenario on Emacs side.

Best,
Ihor


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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-01 16:30     ` Ihor Radchenko
@ 2021-11-01 16:31       ` Ihor Radchenko
  0 siblings, 0 replies; 15+ messages in thread
From: Ihor Radchenko @ 2021-11-01 16:31 UTC (permalink / raw)
  To: Max Nikulin; +Cc: emacs-orgmode


> Emacs core rather than fixing this scenario on Emacs side.
*Org side


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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-01 15:44   ` [BUG] Org V 9.5 error when ~/.cache doesn't exist Max Nikulin
  2021-11-01 16:30     ` Ihor Radchenko
@ 2021-11-02 10:55     ` Ihor Radchenko
  2021-11-02 19:46       ` Tim Cross
                         ` (2 more replies)
  1 sibling, 3 replies; 15+ messages in thread
From: Ihor Radchenko @ 2021-11-02 10:55 UTC (permalink / raw)
  To: Max Nikulin; +Cc: emacs-orgmode

Max Nikulin <manikulin@gmail.com> writes:

> Ihor, your fix affects linux as well. .cache directory may be missed in 
> fresh accounts. E.g. I just have created a new test container (my old 
> one has emacs-25):

After second thought, I am not sure anymore if using XDG is a good idea.
Emacs itself only recently started supporting XDG and the support is
somewhat limited. Similar to the described case with non-existing .cache
directory, Emacs ignores non-existing .config/emacs folder for init.el.
Emacs never creates .config directory.

So, I can see several options for Org:
1. Just move to back usual usage of user-emacs-directory and store the
   cache there
2. Use the same approach with Emacs: if $XDG_CACHE_DIR/org-persist
   exists and user-emacs-directory/org-persist does not, use the XDG
   dir. Otherwise fall back to user-emacs-directory
3. Same as 2, but only require existing $XDG_CACHE_DIR and create
   $XDG_CACHE_DIR/org-persist dir if possible.
4. Same as 3, but create $XDG_CACHE_DIR if possible. It is similar to
   other XDG-complient software (at least, that's what I saw in
   qutebrowser code).

WDYT?

Best,
Ihor


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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-02 10:55     ` Ihor Radchenko
@ 2021-11-02 19:46       ` Tim Cross
  2021-11-03 16:07       ` Max Nikulin
  2021-11-10  2:23       ` Ihor Radchenko
  2 siblings, 0 replies; 15+ messages in thread
From: Tim Cross @ 2021-11-02 19:46 UTC (permalink / raw)
  To: emacs-orgmode


Ihor Radchenko <yantar92@gmail.com> writes:

> Max Nikulin <manikulin@gmail.com> writes:
>
>> Ihor, your fix affects linux as well. .cache directory may be missed in 
>> fresh accounts. E.g. I just have created a new test container (my old 
>> one has emacs-25):
>
> After second thought, I am not sure anymore if using XDG is a good idea.
> Emacs itself only recently started supporting XDG and the support is
> somewhat limited. Similar to the described case with non-existing .cache
> directory, Emacs ignores non-existing .config/emacs folder for init.el.
> Emacs never creates .config directory.
>
> So, I can see several options for Org:
> 1. Just move to back usual usage of user-emacs-directory and store the
>    cache there
> 2. Use the same approach with Emacs: if $XDG_CACHE_DIR/org-persist
>    exists and user-emacs-directory/org-persist does not, use the XDG
>    dir. Otherwise fall back to user-emacs-directory
> 3. Same as 2, but only require existing $XDG_CACHE_DIR and create
>    $XDG_CACHE_DIR/org-persist dir if possible.
> 4. Same as 3, but create $XDG_CACHE_DIR if possible. It is similar to
>    other XDG-complient software (at least, that's what I saw in
>    qutebrowser code).
>

I think the key is to be consistent with user expectations. If the
user's init.el is under XDG layout, then use that, otherwise use
user-emacs-dir. This is slightly different to your No. 2, as I suspect
in the first run of org, it could be possible that init.el is under XDG
layout, but there is no org-persist yet.

Most important requirement would be that the location is a custom
variable, allowing easy customisation for those who want to set it
explicitly.


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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-02 10:55     ` Ihor Radchenko
  2021-11-02 19:46       ` Tim Cross
@ 2021-11-03 16:07       ` Max Nikulin
  2021-11-05 13:27         ` Kaushal Modi
  2021-11-10  2:23       ` Ihor Radchenko
  2 siblings, 1 reply; 15+ messages in thread
From: Max Nikulin @ 2021-11-03 16:07 UTC (permalink / raw)
  To: emacs-orgmode

On 02/11/2021 17:55, Ihor Radchenko wrote:
> Max Nikulin writes:
> 
>> Ihor, your fix affects linux as well. .cache directory may be missed in
>> fresh accounts. E.g. I just have created a new test container (my old
>> one has emacs-25):
> 
> After second thought, I am not sure anymore if using XDG is a good idea.
> Emacs itself only recently started supporting XDG and the support is
> somewhat limited. Similar to the described case with non-existing .cache
> directory, Emacs ignores non-existing .config/emacs folder for init.el.
> Emacs never creates .config directory.
...
> 4. Same as 3, but create $XDG_CACHE_DIR if possible. It is similar to
>     other XDG-complient software (at least, that's what I saw in
>     qutebrowser code).

I like the idea to put temporary automatically created files to a 
dedicated directory. Backups are easier when hand-written config files 
are separated from stuff that can be recreated on demand. Since enough 
applications follow XDG conventions, I suppose, XDG_CACHE_HOME=~/.cache 
is a reasonable variant consistent with user expectations. Emacs 
directory may be a fallback when XDG_CACHE_HOME can not be created. I am 
against using ~/.cache only if it already exists. It may result in stale 
cache in the emacs directory populated before another application 
created ~/.cache, so user would have 2 directories with cache files.

I agree that xdg.el lacks some useful features. Even parts of emacs such 
as startup.el and files.el do not use this package. Similar libraries 
for other programming languages offer wider support of OSes and create 
directories on demand, e.g. https://github.com/adrg/xdg for Go.

Maybe org-macs.el is a better place for code dealing initialization of 
cache directory.


P.S. `org-open-file' may benefit from using of xdg.el. MIME handlers 
obtained from .desktop files should be more consistent with expectations 
of users of desktop environments.



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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-03 16:07       ` Max Nikulin
@ 2021-11-05 13:27         ` Kaushal Modi
  2021-11-05 13:29           ` Kaushal Modi
  2021-11-05 13:32           ` Kaushal Modi
  0 siblings, 2 replies; 15+ messages in thread
From: Kaushal Modi @ 2021-11-05 13:27 UTC (permalink / raw)
  To: Max Nikulin; +Cc: emacs-org list

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

Hello,

On the topic of xdg, I pulled Org from main branch today and tried to build
it but it's failing with:

org-persist.el:32:1:Error: Cannot open load file: No such file or
directory, xdg

Anybody else seeing this?

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

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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-05 13:27         ` Kaushal Modi
@ 2021-11-05 13:29           ` Kaushal Modi
  2021-11-05 13:32           ` Kaushal Modi
  1 sibling, 0 replies; 15+ messages in thread
From: Kaushal Modi @ 2021-11-05 13:29 UTC (permalink / raw)
  To: Max Nikulin; +Cc: emacs-org list

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

On Fri, Nov 5, 2021 at 9:27 AM Kaushal Modi <kaushal.modi@gmail.com> wrote:

> Hello,
>
> On the topic of xdg, I pulled Org from main branch today and tried to
> build it but it's failing with:
>
> org-persist.el:32:1:Error: Cannot open load file: No such file or
> directory, xdg
>
> Anybody else seeing this?
>

To add more context, I am on emacs-28 branch right now.

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

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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-05 13:27         ` Kaushal Modi
  2021-11-05 13:29           ` Kaushal Modi
@ 2021-11-05 13:32           ` Kaushal Modi
  2021-11-05 13:50             ` Ihor Radchenko
  1 sibling, 1 reply; 15+ messages in thread
From: Kaushal Modi @ 2021-11-05 13:32 UTC (permalink / raw)
  To: Max Nikulin; +Cc: emacs-org list

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

On Fri, Nov 5, 2021 at 9:27 AM Kaushal Modi <kaushal.modi@gmail.com> wrote:

> Hello,
>
> On the topic of xdg, I pulled Org from main branch today and tried to
> build it but it's failing with:
>
> org-persist.el:32:1:Error: Cannot open load file: No such file or
> directory, xdg
>
> Anybody else seeing this?
>

Figured out the problem.. looks like Org main branch doesn't support emacs
25.

My build script was building Org for all emacs versions starting from
version 25. It builds fine if remove the build  for emacs 25. I think I
missed it somewhere that Org main branch is dropping emacs 25 support.

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

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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-05 13:32           ` Kaushal Modi
@ 2021-11-05 13:50             ` Ihor Radchenko
  2021-11-05 22:08               ` Kaushal Modi
  2021-11-05 22:13               ` Tim Cross
  0 siblings, 2 replies; 15+ messages in thread
From: Ihor Radchenko @ 2021-11-05 13:50 UTC (permalink / raw)
  To: Kaushal Modi; +Cc: Max Nikulin, emacs-org list

Kaushal Modi <kaushal.modi@gmail.com> writes:

> Figured out the problem.. looks like Org main branch doesn't support emacs
> 25.
>
> My build script was building Org for all emacs versions starting from
> version 25. It builds fine if remove the build  for emacs 25. I think I
> missed it somewhere that Org main branch is dropping emacs 25 support.

I am not sure if we are dropping Emacs 25 just yet. However, there is
currently more than one place in Org that does not work on Emacs 25.
See https://list.orgmode.org/87zgqu6081.fsf@localhost/T/#t

If compilation is critical for you, I can make a patch to make things
compile in Emacs 25. Though compatibility layer for xdg is more tricky.
I do not want to do it unless necessary.

Best,
Ihor


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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-05 13:50             ` Ihor Radchenko
@ 2021-11-05 22:08               ` Kaushal Modi
  2021-11-05 22:13               ` Tim Cross
  1 sibling, 0 replies; 15+ messages in thread
From: Kaushal Modi @ 2021-11-05 22:08 UTC (permalink / raw)
  To: Ihor Radchenko; +Cc: Max Nikulin, emacs-org list

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

On Fri, Nov 5, 2021, 9:48 AM Ihor Radchenko <yantar92@gmail.com> wrote:

>
> I am not sure if we are dropping Emacs 25 just yet. However, there is
> currently more than one place in Org that does not work on Emacs 25.
> See https://list.orgmode.org/87zgqu6081.fsf@localhost/T/#t
>
> If compilation is critical for you, I can make a patch to make things
> compile in Emacs 25. Though compatibility layer for xdg is more tricky.
> I do not want to do it unless necessary.
>

I haven't switched back to emacs 25 in a while. It's just that the script I
had for building Org started failing. All's good after removing the build
step for emacs 25.

I am anyways on emacs/master and then emacs-28 for a while now. So I
personally don't need emacs 25 compatibility. But in any case, this
breakage on emacs 25 should be fixed or the min req bumped to emacs 26.

>

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

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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-05 13:50             ` Ihor Radchenko
  2021-11-05 22:08               ` Kaushal Modi
@ 2021-11-05 22:13               ` Tim Cross
  1 sibling, 0 replies; 15+ messages in thread
From: Tim Cross @ 2021-11-05 22:13 UTC (permalink / raw)
  To: emacs-orgmode


Ihor Radchenko <yantar92@gmail.com> writes:

> Kaushal Modi <kaushal.modi@gmail.com> writes:
>
>> Figured out the problem.. looks like Org main branch doesn't support emacs
>> 25.
>>
>> My build script was building Org for all emacs versions starting from
>> version 25. It builds fine if remove the build  for emacs 25. I think I
>> missed it somewhere that Org main branch is dropping emacs 25 support.
>
> I am not sure if we are dropping Emacs 25 just yet. However, there is
> currently more than one place in Org that does not work on Emacs 25.
> See https://list.orgmode.org/87zgqu6081.fsf@localhost/T/#t
>
> If compilation is critical for you, I can make a patch to make things
> compile in Emacs 25. Though compatibility layer for xdg is more tricky.
> I do not want to do it unless necessary.
>

If we assume this version will not be released until Emacs 28 is
released, then I don't think emacs 25.x compatibility is required.
However, if these changes are to be incorporated into a release prior to
the release of Emacs 28, support for version 25.x would be required.

While release candidates for Emacs 28 have been released, I'm not sure
version 28 will be out this year. I would expect it will be released in
the next 6 - 12 months.

I would assume emacs 28 to include the released
9.5 (plus bug fixes) version and these changes to be in the 9.6 version?


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

* Re: [BUG] Org V 9.5 error when ~/.cache doesn't exist
  2021-11-02 10:55     ` Ihor Radchenko
  2021-11-02 19:46       ` Tim Cross
  2021-11-03 16:07       ` Max Nikulin
@ 2021-11-10  2:23       ` Ihor Radchenko
  2 siblings, 0 replies; 15+ messages in thread
From: Ihor Radchenko @ 2021-11-10  2:23 UTC (permalink / raw)
  To: Max Nikulin; +Cc: emacs-orgmode

Ihor Radchenko <yantar92@gmail.com> writes:

> After second thought, I am not sure anymore if using XDG is a good idea.
> Emacs itself only recently started supporting XDG and the support is
> somewhat limited. Similar to the described case with non-existing .cache
> directory, Emacs ignores non-existing .config/emacs folder for init.el.
> Emacs never creates .config directory.

Some more data:

xdg.el is not (yet?) supported by Aquamacs [1]. While we do not
officially support Aquamacs, it is probably best to avoid xdg.el if we
can.

Also, there is an ongoing discussion at emacs-devel about Emacs support
for XDG specs and similar [2]. If the new user-directory library gets
merged to Emacs, it may be the way to go (with proper back-compatibility
aliases).

[1] https://list.orgmode.org/CAFqubHf+WpuNEEapKcG94WjHFcRxVSF+j-7Ut3b_roMfKQchhg@mail.gmail.com/T/#m99c63439a745c07fd7c30cde0b49b3d5bd1757f0
[2] https://lists.gnu.org/archive/html/emacs-devel/2021-11/msg00469.html

Best,
Ihor


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

end of thread, other threads:[~2021-11-10  2:23 UTC | newest]

Thread overview: 15+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-10-31 19:18 [BUG] Org V 9.5 error when ~/.cache doesn't exist [9.5 (9.5-gd4e192 @ c:/Users/scott/.emacs.d/straight/build/org/)] Scott Otterson
2021-11-01 11:29 ` Ihor Radchenko
2021-11-01 15:44   ` [BUG] Org V 9.5 error when ~/.cache doesn't exist Max Nikulin
2021-11-01 16:30     ` Ihor Radchenko
2021-11-01 16:31       ` Ihor Radchenko
2021-11-02 10:55     ` Ihor Radchenko
2021-11-02 19:46       ` Tim Cross
2021-11-03 16:07       ` Max Nikulin
2021-11-05 13:27         ` Kaushal Modi
2021-11-05 13:29           ` Kaushal Modi
2021-11-05 13:32           ` Kaushal Modi
2021-11-05 13:50             ` Ihor Radchenko
2021-11-05 22:08               ` Kaushal Modi
2021-11-05 22:13               ` Tim Cross
2021-11-10  2:23       ` Ihor Radchenko

Code repositories for project(s) associated with this inbox:

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

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).