emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* Bug: org-list-make-subtree produces incorrect level [9.2.3 (9.2.3-20-g31873e-elpaplus @ /home/felix/.emacs.d/elpa/org-plus-contrib-20190527/)]
@ 2019-06-01 19:30 Felix Wiemuth
  2019-06-09 22:20 ` Nicolas Goaziou
  0 siblings, 1 reply; 2+ messages in thread
From: Felix Wiemuth @ 2019-06-01 19:30 UTC (permalink / raw)
  To: emacs-orgmode@gnu.org

In some situations, org-list-make-subtree does not create the tree at
the desired level. For example, in the following case, when executing
the command on the first list element, the resulting level is 3 instead
of 2:

* L1
  - List Item
** L2

The result is:

* L1
*** List Item
** L2

Expected result (as in most situations):

* L1
** List Item
** L2

The last item (L2) is necessary for this to happen, whether the list has multiple items or
subitems does not matter. The identation of the list item does not
matter either.

The same happens in deeper levels:

* L1
** L2a
** L2b
   - List Item
*** L3

It seems that the resulting tree is always put one level deeper than a
(deeper) heading following without a newline. Maybe this was intended
but it feels unintuitive to me.

* L1
  - List Item
*** L3

results in

* L1
**** List Item
*** L3

but

* L1
  - List Item

*** L3

results in

* L1
** List Item

*** L3

I think I also observed a case where the resulting level was 2 instead
of 4, so the other way round, but unfortunately I cannot reproduce it.

Emacs  : GNU Emacs 26.2 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.8)
 of 2019-04-12
Package: Org mode version 9.2.3 (9.2.3-20-g31873e-elpaplus @ /home/felix/.emacs.d/elpa/org-plus-contrib-20190527/)

current state:
==============
(setq
 org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
 org-blank-before-new-entry '((heading) (plain-list-item))
 org-babel-after-execute-hook '(spacemacs/ob-fix-inline-images)
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
 org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
                              (insert (format "cite:%s\n" (org-entry-get (point) "Custom_ID"))))
                             )
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-imenu-depth 8
 org-download-annotate-function 'org-download-annotate-default
 org-agenda-files '("/dateien/Organisation/Computer/notes/programs/emacs/orgmodetest.org"
                    "/dateien/Sync/todo/todo.org")
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-mode-hook '(org-ref-org-menu #[0 "\301\211\x10\207" [imenu-create-index-function org-imenu-get-tree] 2]
                 #[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 visual-line-mode spacemacs/load-yasnippet
                 toc-org-enable (lambda nil (require (quote org-ref))) org-download-enable org-bullets-mode
                 spacemacs//org-babel-do-load-languages spacemacs/add-org-surrounds evil-org-mode org-eldoc-load
                 spacemacs//init-company-org-mode company-mode)
 org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-agenda-restore-windows-after-quit t
 org-confirm-elisp-link-function 'yes-or-no-p
 org-startup-with-inline-images 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-bibtex-headline-format-function #[257 "\300\x01\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-babel-pre-tangle-hook '(save-buffer)
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 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-log-done 'time
 org-ref-insert-label-function 'org-ref-helm-insert-label-link
 org-ref-open-pdf-function 'org-ref-open-pdf-at-point
 org-ascii-format-drawer-function #[771 "\x01\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
 org-ref-open-notes-function '(lambda nil (org-show-entry) (outline-show-branches) (outline-show-children)
                               (org-cycle (quote (64))) (recenter-top-bottom 0))
 org-src-lang-modes '(("arduino" . arduino) ("redis" . redis) ("php" . php) ("C" . c) ("C++" . c++)
                      ("asymptote" . asy) ("bash" . sh) ("beamer" . latex) ("calc" . fundamental) ("cpp" . c++)
                      ("ditaa" . artist) ("dot" . fundamental) ("elisp" . emacs-lisp) ("ocaml" . tuareg)
                      ("screen" . shell-script) ("shell" . sh) ("sqlite" . sql))
 org-occur-hook '(org-first-headline-recenter)
 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-cycle-hook '(org-cycle-hide-archived-subtrees 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-clock-persist-file "/home/felix/.emacs.d/.cache/org-clock-save.el"
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-publish-timestamp-directory "/home/felix/.emacs.d/.cache/.org-timestamps/"
 org-export-async-init-file "/home/felix/.emacs.d/layers/+emacs/org/local/org-async-init.el"
 org-id-locations-file "/home/felix/.emacs.d/.cache/.org-id-locations"
 org-confirm-shell-link-function 'yes-or-no-p
 org-link-parameters '(("id" :follow org-id-open)
                       ("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 (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Autocites :complete org-Autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("autocites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-autocites :complete org-autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("supercites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-supercites :complete org-supercites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Textcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Textcites :complete org-Textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("textcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-textcites :complete org-textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Smartcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Smartcites :complete org-Smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("smartcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-smartcites :complete org-smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("footcitetexts" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcitetexts :complete org-footcitetexts-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("footcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcites :complete org-footcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Parencites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Parencites :complete org-Parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("parencites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-parencites :complete org-parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Cites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Cites :complete org-Cites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("cites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-cites :complete org-cites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("fnotecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-fnotecite :complete org-fnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Pnotecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Pnotecite :complete org-Pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("pnotecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-pnotecite :complete org-pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Notecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Notecite :complete org-Notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("notecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-notecite :complete org-notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("footfullcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footfullcite :complete org-footfullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("fullcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-fullcite :complete org-fullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citeurl" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeurl :complete org-citeurl-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citedate*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citedate* :complete org-citedate*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citedate" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citedate :complete org-citedate-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citetitle*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citetitle* :complete org-citetitle*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citetitle" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citetitle :complete org-citetitle-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Citeauthor*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citeauthor* :complete org-Citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Autocite* :complete org-Autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("autocite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-autocite* :complete org-autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Autocite :complete org-Autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("autocite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-autocite :complete org-autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("supercite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-supercite :complete org-supercite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("parencite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-parencite* :complete org-parencite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("cite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-cite* :complete org-cite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Smartcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Smartcite :complete org-Smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("smartcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-smartcite :complete org-smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Textcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Textcite :complete org-Textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("textcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-textcite :complete org-textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("footcitetext" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcitetext :complete org-footcitetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("footcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-footcite :complete org-footcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Parencite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Parencite :complete org-Parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("parencite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-parencite :complete org-parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Cite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Cite :complete org-Cite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Citeauthor" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citeauthor :complete org-Citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Citealp" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citealp :complete org-Citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Citealt" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citealt :complete org-Citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Citep" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citep :complete org-Citep-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("Citet" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-Citet :complete org-Citet-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("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 (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyear*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeyear* :complete org-citeyear*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyear" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeyear :complete org-citeyear-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citeauthor*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeauthor* :complete org-citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citeauthor" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeauthor :complete org-citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citetext" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citetext :complete org-citetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citenum" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citenum :complete org-citenum-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citealp*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealp* :complete org-citealp*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citealp" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealp :complete org-citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citealt*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealt* :complete org-citealt*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citealt" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citealt :complete org-citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citep*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citep* :complete org-citep*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citep" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citep :complete org-citep-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citet*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citet* :complete org-citet*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("citet" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citet :complete org-citet-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("nocite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-nocite :complete org-nocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        )
                       ("cite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-cite :complete org-cite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key) (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point)
                           (kill-new (org-ref-format-bibtex-entry-at-point)))
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
                        :store org-ref-bibtex-store-link)
                       ("Cref" :follow org-ref-ref-follow :export org-ref-Cref-export :complete
                        org-ref-complete-link :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
                        org-ref-complete-link :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
                        org-ref-complete-link :face org-ref-ref-face-fn :help-echo org-ref-ref-help-echo)
                       ("eqref" :follow org-ref-ref-follow :export org-ref-eqref-export :complete
                        org-ref-complete-link :face org-ref-ref-face-fn :help-echo org-ref-ref-help-echo)
                       ("nameref" :follow org-ref-ref-follow :export org-ref-export-nameref :complete
                        org-ref-complete-link :face org-ref-ref-face-fn :help-echo org-ref-ref-help-echo)
                       ("pageref" :follow org-ref-ref-follow :export
                        #[(path desc format) "\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 org-pageref-complete-link :help-echo
                        org-ref-ref-help-echo)
                       ("ref" :follow org-ref-ref-follow :export org-ref-ref-export :complete org-ref-complete-link
                        :face org-ref-ref-face-fn :help-echo org-ref-ref-help-echo)
                       ("label" :follow
                        #[(label)
                          "\302\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-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 :help-echo or-acronym-tooltip
                        :export
                        #[771 "\211\301\267\202
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("Acp" . "Glspl") #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acp" :follow or-follow-acronym :face org-ref-acronym-face :help-echo or-acronym-tooltip
                        :export
                        #[771 "\211\301\267\202
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("acp" . "glspl") #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Ac" :follow or-follow-acronym :face org-ref-acronym-face :help-echo or-acronym-tooltip
                        :export
                        #[771 "\211\301\267\202
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("Ac" . "Gls") #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("ac" :follow or-follow-acronym :face org-ref-acronym-face :help-echo or-acronym-tooltip
                        :export
                        #[771 "\211\301\267\202
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("ac" . "gls") #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrfull" :follow or-follow-acronym :face org-ref-acronym-face :help-echo or-acronym-tooltip
                        :export
                        #[771 "\211\301\267\202
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("acrfull" . "acrfull") #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrlong" :follow or-follow-acronym :face org-ref-acronym-face :help-echo or-acronym-tooltip
                        :export
                        #[771 "\211\301\267\202
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("acrlong" . "acrlong") #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrshort" :follow or-follow-acronym :face org-ref-acronym-face :help-echo
                        or-acronym-tooltip :export
                        #[771 "\211\301\267\202
\0\302\303\300A\x05#\207\302\304\x04\226\"\207"
                          [("acrshort" . "acrshort") #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glslink" :follow or-follow-glossary :face org-ref-glossary-face :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\300\267\202\f\0\301\302\x04\x04#\207\301\303\x04\"\207"
                          [#s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\glslink{%s}{%s}" "%s"]
                          7 "\n\n(fn PATH DESC FORMAT)"]
                        )
                       ("glsdesc" :follow or-follow-glossary :face org-ref-glossary-face :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301\267\202\f\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["glsdesc" #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glssymbol" :follow or-follow-glossary :face org-ref-glossary-face :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301\267\202\f\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["glssymbol" #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Glspl" :follow or-follow-glossary :face org-ref-glossary-face :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301\267\202\f\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["Glspl" #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Gls" :follow or-follow-glossary :face org-ref-glossary-face :help-echo or-glossary-tooltip
                        :export
                        #[771 "\211\301\267\202\f\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["Gls" #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glspl" :follow or-follow-glossary :face org-ref-glossary-face :help-echo
                        or-glossary-tooltip :export
                        #[771 "\211\301\267\202\f\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["glspl" #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("gls" :follow or-follow-glossary :face org-ref-glossary-face :help-echo or-glossary-tooltip
                        :export
                        #[771 "\211\301\267\202\f\0\302\303\300\x05#\207\302\304\x04\"\207"
                          ["gls" #s
                           (hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data
                            (latex 6))
                           format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("eww" :follow eww :store org-eww-store-link)
                       ("rmail" :follow org-rmail-open :store org-rmail-store-link)
                       ("mhe" :follow org-mhe-open :store org-mhe-store-link)
                       ("irc" :follow org-irc-visit :store org-irc-store-link :export org-irc-export)
                       ("info" :follow org-info-open :export org-info-export :store org-info-store-link)
                       ("gnus" :follow org-gnus-open :store org-gnus-store-link)
                       ("docview" :follow org-docview-open :export org-docview-export :store org-docview-store-link)
                       ("bibtex" :follow org-bibtex-open :store org-bibtex-store-link)
                       ("bbdb" :follow org-bbdb-open :export org-bbdb-export :complete org-bbdb-complete-link :store
                        org-bbdb-store-link)
                       ("w3m" :store org-w3m-store-link) ("file+sys") ("file+emacs")
                       ("orgit-rev" :store orgit-rev-store :follow orgit-rev-open :export orgit-rev-export :complete
                        orgit-rev-complete-link)
                       ("orgit-log" :store orgit-log-store :follow orgit-log-open :export orgit-log-export :complete
                        orgit-log-complete-link)
                       ("orgit" :store orgit-status-store :follow orgit-status-open :export orgit-status-export
                        :complete orgit-status-complete-link)
                       ("doi" :follow doi-link-menu :export
                        #[(doi desc format)
                          "\b\304\267\202 \0\300\305	\n\v\206\x11\0\306\nP$\207\300\307	\n\v\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]
                        )
                       ("elisp" :follow org--open-elisp-link) ("file" :complete org-file-complete-link)
                       ("ftp" :follow (lambda (path) (browse-url (concat "ftp:" path))))
                       ("help" :follow org--open-help-link)
                       ("http" :follow (lambda (path) (browse-url (concat "http:" path))))
                       ("https" :follow (lambda (path) (browse-url (concat "https:" path))))
                       ("mailto" :follow (lambda (path) (browse-url (concat "mailto:" path))))
                       ("news" :follow (lambda (path) (browse-url (concat "news:" path))))
                       ("shell" :follow org--open-shell-link))
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-present-mode-hook '(spacemacs//org-present-start)
 org-link-translation-function 'toc-org-unhrefify
 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-image-actual-width nil
 org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
 org-present-mode-quit-hook '(spacemacs//org-present-end)
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-ref-cite-onclick-function 'org-ref-cite-click-helm
 org-ref-notes-function 'org-ref-notes-function-one-file
 org-download-abbreviate-filename-function 'file-relative-name
 org-default-notes-file "notes.org"
 )

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

end of thread, other threads:[~2019-06-09 22:21 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2019-06-01 19:30 Bug: org-list-make-subtree produces incorrect level [9.2.3 (9.2.3-20-g31873e-elpaplus @ /home/felix/.emacs.d/elpa/org-plus-contrib-20190527/)] Felix Wiemuth
2019-06-09 22:20 ` Nicolas Goaziou

Code repositories for project(s) associated with this public 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).