emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Uwe Brauer <oub@mat.ucm.es>
To: emacs-orgmode@gnu.org
Subject: Bug: org-table-sort-lines returns error [9.3.7 (release_9.3.7-705-gea9463 @ /home/oub/emacs/site-lisp/packages/org/)]
Date: Mon, 10 Aug 2020 19:45:15 +0200	[thread overview]
Message-ID: <87o8ni8kes.fsf@mat.ucm.es> (raw)

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


I am running emacs 28 master 84ec57fe06e187f41a3546131d5dae3b185c3511

Steps to reproduce 

 #+TBLNAME: original
 | Day       | Color | Level | Quantity |
 |-----------+-------+-------+----------|
 | Monday    | Red   |    30 |       11 |
 | Monday    | Blue  |    25 |        3 |
 | Tuesday   | Red   |    51 |       12 |
 | Tuesday   | Red   |    45 |       15 |
 | Tuesday   | Blue  |    33 |       18 |
 | Wednesday | Red   |    27 |       23 |
 | Wednesday | Blue  |    12 |       16 |
 | Wednesday | Blue  |    15 |       15 |
 | Thursday  | Red   |    39 |       24 |
 | Thursday  | Red   |    41 |       29 |
 | Thursday  | Red   |    49 |       30 |
 | Friday    | Blue  |     7 |        5 |
 | Friday    | Blue  |     6 |        8 |
 | Friday    | Blue  |    11 |        9 |

Put curso on number 30 in the third column call the function and select
numercial sorting, a bug trace occurs which I attach. 
I run undo, widen and repeat the operation and then it works 

Regards

Uwe Brauer 

------------------------------------------------------------------------



Emacs  : GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, X toolkit, cairo version 1.14.6, Xaw3d scroll bars)
 of 2020-07-23
Package: Org mode version 9.3.7 (release_9.3.7-705-gea9463 @ /home/oub/emacs/site-lisp/packages/org/)

current state:
==============
(setq
 org-table-export-default-format "my-tbl-to-csv"
 org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
 org-latex-listings t
 org-capture-prepare-finalize-hook '(gnorb-registry-capture gnorb-org-capture-abort-cleanup)
 org-link-shell-confirm-function 'yes-or-no-p
 org-blank-before-new-entry '((heading . auto) (plain-list-item . t))
 org-babel-after-execute-hook '(org-display-inline-images)
 org-tempo-keywords-alist '(("T" . "latex") ("A" . "ascii") ("i" . "index"))
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-latex-to-mathml-jar-file "/home/oub/ALLES/src/MathWeb/mathtoweb.jar"
 org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
 org-time-stamp-custom-formats '(" %d.%m.%Y " . " %d.%m.%Y %a %H:%M ")
 org-pretty-entities t
 org-enforce-todo-dependencies t
 org-latex-default-packages-alist '(("AUTO" "inputenc" t ("pdflatex")) ("T1" "fontenc" t ("pdflatex")) ("" "graphicx" t nil)
                                    ("" "grffile" t nil) ("" "longtable" nil nil) ("" "wrapfig" nil nil) ("" "rotating" nil nil)
                                    ("normalem" "ulem" t nil) ("" "amsmath" t nil) ("" "textcomp" t nil) ("" "amssymb" t nil)
                                    ("" "capt-of" nil nil) ("colorlinks,backref" "hyperref" nil nil) ("" "a4wide" nil nil))
 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-agenda-files '("~/Desktop/Grupos-Annu/tutorias.org" "~/Desktop/Grupos-Annu/grupos-annu20.org")
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-latex-to-mathml-convert-command "java -jar %j -unicode -force -df %o %I"
 org-modules '(org-bibtex org-docview org-eww org-gnus org-info org-irc org-mhe org-rmail org-w3m org-bookmark)
 org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
 org-gnus-prefer-web-links t
 org-calc-default-modes '(calc-internal-prec 12 calc-float-format (float 4) calc-angle-mode deg calc-prefer-frac nil calc-symbolic-mode nil
                          calc-date-format (YYYY "-" MM "-" DD " " Www (" " hh ":" mm)) calc-display-working-message t)
 org-format-latex-header "\\documentclass{article}\n\\usepackage[usenames]{color}\n[PACKAGES]\n[DEFAULT-PACKAGES]\n\\pagestyle{empty}             % do not remove\n% The settings below are copied from fullpage.sty\n\\setlength{\\textwidth}{\\paperwidth}\n\\usepackage{amsmath,amssymb}\n\\addtolength{\\textwidth}{-3cm}\n\\setlength{\\oddsidemargin}{1.5cm}\n\\addtolength{\\oddsidemargin}{-2.54cm}\n\\setlength{\\evensidemargin}{\\oddsidemargin}\n\\setlength{\\textheight}{\\paperheight}\n\\addtolength{\\textheight}{-\\headheight}\n\\addtolength{\\textheight}{-\\headsep}\n\\addtolength{\\textheight}{-\\footskip}\n\\addtolength{\\textheight}{-3cm}\n\\setlength{\\topmargin}{1.5cm}\n\\newtheorem{thm}{Theorem}\n\\newtheorem{defn}{Definition}\n\\newtheorem{lem}{Lemma}\n\\newtheorem{cor}{Corollary}\n\\newtheorem{rem}{Remark}\n\\newtheorem{bei}{}\n\\newtheorem{prop}{Preposition}\n\\newcommand{\\setR}{{\\mathord{\\mathbb R}}}\n\\addtolength{\\topmargin}{-2.54cm} "
 org-mode-hook '(#[0 "\301\211\207" [imenu-create-index-function org-imenu-get-tree] 2] navi-make-org-mode-promotion-headings-list
                 (lambda nil (local-set-key [C-M-up] 'org-table-move-single-cell-up)
                  (local-set-key [C-M-down] 'org-table-move-single-cell-down) (local-set-key [C-M-left] 'org-table-move-single-cell-left)
                  (local-set-key [C-M-right] 'org-table-move-single-cell-right))
                 org-ref-org-menu ob-ipython-auto-configure-kernels turn-on-diff-hl-mode turn-on-auto-fill my-org-keys turn-on-flyspell
                 turn-on-auto-capitalize-mode org-tempo-setup orgtbl-show-header org-auctex-keys-minor-mode
                 #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-show-all append local] 5]
                 #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-babel-show-result-all append local] 5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes org-ref-setup-label-finders)
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-agenda-finalize-hook '(gnorb-org-popup-bbdb org-agenda-property-add-properties)
 org-ref-bibliography-entry-format '(("misc" . "%a %t <i>%h</i> (%y) <a href=\"%U\">link</a>")
                                     ("article" .
                                      "%a, %t, <i>%j</i>, <b>%v(%n)</b>, %p (%y). <a href=\"%U\">link</a>. <a href=\"http://dx.doi.org/%D\">doi</a>. <b>%N</b>")
                                     ("book" . "%a, %t, %u (%y).") ("techreport" . "%a, %t, %i, %u (%y).")
                                     ("proceedings" . "%e, %t in %S, %u (%y).") ("inproceedings" . "%a, %t, %p, in %b, edited by %e, %u (%y)"))
 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\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-ref-default-citation-link "autocite"
 org-ref-insert-cite-key "C-c c"
 org-mime-html-hook '((lambda nil (while (re-search-forward "@\\([^@]*\\)@" nil t) (replace-match "<span style=\"color:red\">\\1</span>")))
                      (lambda nil (org-mime-change-element-style "blockquote" "border-left: 2px solid gray; padding-left: 4px;"))
                      (lambda nil
                       (org-mime-change-element-style "pre" (format "color: %s; background-color: %s; padding: 0.5em;" "#E6E1DC" "#232323")))
                      )
 org-babel-pre-tangle-hook '(save-buffer)
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 org-html-table-default-attributes '(:border "2" :cellspacing "0" :cellpadding "6" :frame "border" :rules "all")
 org-ref-bibliography-notes '("/home/oub/ALLES/HGs/tex/bib/notes.org")
 org-babel-load-languages '((emacs-lisp . t) (R . t))
 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-load-hook '(my-link-keys org-insert-dblock-bindings org-insert-dblock-bindings)
 org-ref-open-pdf-function 'org-ref-open-pdf-at-point
 org-highlight-latex-and-related '(latex)
 org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
 org-ref-formatted-citation-formats '(("text"
                                       ("article" . "${author}, ${title}, ${journal}, ${volume}(${number}), ${pages} (${year}). ${doi}")
                                       ("miscellaneous" . "${author}, ${title}, ${howpublished},  (${year}).")
                                       ("inproceedings" .
                                        "${author}, ${title}, In ${editor}, ${booktitle} (pp. ${pages}) (${year}). ${address}: ${publisher}.")
                                       ("book" . "${author}, ${title} (${year}), ${address}: ${publisher}.")
                                       ("phdthesis" . "${author}, ${title} (Doctoral dissertation) (${year}). ${school}, ${address}.")
                                       ("inbook" .
                                        "${author}, ${title}, In ${editor} (Eds.), ${booktitle} (pp. ${pages}) (${year}). ${address}: ${publisher}.")
                                       ("incollection" .
                                        "${author}, ${title}, In ${editor} (Eds.), ${booktitle} (pp. ${pages}) (${year}). ${address}: ${publisher}.")
                                       ("proceedings" . "${editor} (Eds.), ${booktitle} (${year}). ${address}: ${publisher}.")
                                       ("unpublished" . "${author}, ${title} (${year}). Unpublished manuscript.")
                                       (nil . "${author}, ${title} (${year})."))
                                      ("org" ("misc" . "${author}, /${title}/ *${howpublished}* (${year}).")
                                       ("misc" . "${author}, /${title}/ *${howpublished}* (${year}).")
                                       ("misc" . "${author}, /${title}/ *${howpublished}* (${year}).")
                                       ("misc" . "${author}, /${title}/ *${howpublished}* (${year}).")
                                       ("misc" . "${author}, /${title}/ *${howpublished}* (${year}).")
                                       ("misc" . "${author}, /${title}/ *${howpublished}* (${year}).")
                                       ("article" . "${author}, /${title}/, ${journal}, *${volume}(${number})*, ${pages} (${year}). ${doi}")
                                       ("inproceedings" .
                                        "${author}, /${title}/, In ${editor}, ${booktitle} (pp. ${pages}) (${year}). ${address}: ${publisher}.")
                                       ("book" . "${author}, /${title}/ (${year}), ${address}: ${publisher}.")
                                       ("phdthesis" . "${author}, /${title}/ (Doctoral dissertation) (${year}). ${school}, ${address}.")
                                       ("inbook" .
                                        "${author}, /${title}/, In ${editor} (Eds.), ${booktitle} (pp. ${pages}) (${year}). ${address}: ${publisher}.")
                                       ("incollection" .
                                        "${author}, /${title}/, In ${editor} (Eds.), ${booktitle} (pp. ${pages}) (${year}). ${address}: ${publisher}.")
                                       ("proceedings" . "${editor} (Eds.), _${booktitle}_ (${year}). ${address}: ${publisher}.")
                                       ("unpublished" . "${author}, /${title}/ (${year}). Unpublished manuscript.")
                                       (nil . "${author}, /${title}/ (${year})."))
                                      )
 org-ref-open-notes-function '(lambda nil (org-show-entry) (outline-show-branches) (outline-show-children) (org-cycle '(64))
                               (recenter-top-bottom 0))
 org-agenda-loop-over-headlines-in-active-region nil
 org-src-lang-modes '(("jupyter-matlab" . matlab) ("jupyter-python" . python) ("ipython" . python) ("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-src-preserve-indentation t
 org-annotate-file-add-search t
 org-occur-hook '(org-first-headline-recenter)
 outline-minor-mode-hook '(outshine--outline-minor-mode-hook outshine-mode)
 org-protocol-protocol-alist '(("capture-html" :protocol "capture-html" :function org-protocol-capture-html--with-pandoc :kill-client t))
 org-export-before-processing-hook '(f-ox-filter-table-column-del)
 org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
 org-mime-find-html-start '(lambda (start)
                            (save-excursion (goto-char start)
                             (re-search-forward "<#secure method=smime mode=sign>\\|<#secure method=smime mode=signencrypt>\\| ")
                             (+ (point) 1))
                            )
 org-structure-template-alist '(("a" . "export ascii") ("C" . "comment") ("e" . "example") ("E" . "export") ("h" . "export html")
                                ("m" . "src matlab :tangle mieuler.m :exports code  :padline no :eval never-export")
                                ("M" . "src matlab :exports code :eval never-export ") ("Q" . "quote") ("S" . "src")
                                ("s" . "src matlab :results output raw :exports code  :eval never-export")
                                ("q" . "src matlab :results output latex :exports code  :eval never-export :wrap latex") ("L" . "solution")
                                ("l" . "src latex :results latex replace :exports results :eval t")
                                ("w" .
                                 "src elisp :noexport\n(setq  org-odt-convert-process \"LibreOffice\")\n(setq org-odt-convert-processes\n'((\"LibreOffice\" \"/opt/libreoffice6.2/program/soffice --headless --convert-to %f%x --outdir %d %i\")\n (\"unoconv\" \"/usr/bin/unoconv -f %f -o %d %i\")))\n(setq org-odt-preferred-output-format \"docx\")\n")
                                ("v" . "verse"))
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-todo-keywords '((sequence "TODO(t)" "WAIT(w@/!)" "|" "DONE(d@)" "CANCELED(c@)"))
 org-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate)
 org-ref-default-bibliography '("/home/oub/ALLES/HGs/tex/bib/bibgraf.bib")
 org-capture-mode-hook '(gnorb-org-capture-function)
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-html-with-latex 'mathjax
 org-latex-prefer-user-labels t
 org-odt-convert-process "gnumeric"
 org-babel-tangle-lang-exts '(("D" . "d") ("C++" . "cpp") ("perl" . "pl") ("ruby" . "rb") ("python" . "py") ("latex" . "tex")
                              ("emacs-lisp" . "el") ("elisp" . "el"))
 org-return-follows-link t
 org-format-latex-options '(:foreground default :background default :scale 1.5 :html-foreground "Black" :html-background "Transparent"
                            :html-scale 1 :matchers ("begin" "$1" "$" "$$" "\\(" "\\["))
 org-ref-pdf-to-bibtex-function 'copy-file
 org-export-with-author nil
 org-export-before-parsing-hook '(org-attach-expand-links)
 org-latex-listings-langs '((emacs-lisp "Lisp") (lisp "Lisp") (clojure "Lisp") (c "C") (cc "C++") (fortran "fortran") (perl "Perl")
                            (cperl "Perl") (python "Python") (ruby "Ruby") (html "HTML") (xml "XML") (tex "TeX") (latex "[LaTeX]TeX")
                            (shell-script "bash") (gnuplot "Gnuplot") (ocaml "Caml") (caml "Caml") (sql "SQL") (matlab "Matlab")
                            (sqlite "sql") (makefile "make"))
 org-confirm-shell-link-function 'yes-or-no-p
 org-link-parameters '(("w3m" :store org-w3m-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)
                       ("info" :follow org-info-open :export org-info-export :store org-info-store-link)
                       ("gnus" :follow org-gnus-open :store org-gnus-store-link) ("eww" :follow eww :store org-eww-store-link)
                       ("docview" :follow org-docview-open :export org-docview-export :store org-docview-store-link) ("tel")
                       ("citeauthorfull" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export
                        org-ref-format-citeauthorfull :complete org-citeauthorfull-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("printindex" :follow org-ref-index :export
                        #[(path desc format) "\b\301=\205	\300\302!\207" [format latex "\\printindex"] 2])
                       ("index" :follow #[(path) "\301\b!\207" [path occur] 2] :export
                        #[(path desc format) "\b\302=\205\n\300\303	\"\207" [format path latex "\\index{%s}"] 3])
                       ("bibentry" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-bibentry :complete
                        org-bibentry-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Autocites
                        :complete org-Autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("autocites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-autocites
                        :complete org-autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("supercites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-supercites
                        :complete org-supercites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Textcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Textcites
                        :complete org-Textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("textcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-textcites
                        :complete org-textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Smartcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Smartcites
                        :complete org-Smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("smartcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-smartcites
                        :complete org-smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcitetexts" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-footcitetexts
                        :complete org-footcitetexts-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-footcites
                        :complete org-footcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Parencites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Parencites
                        :complete org-Parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("parencites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-parencites
                        :complete org-parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Cites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Cites :complete
                        org-Cites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("cites" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-cites :complete
                        org-cites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("fnotecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-fnotecite
                        :complete org-fnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Pnotecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Pnotecite
                        :complete org-Pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("pnotecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-pnotecite
                        :complete org-pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Notecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Notecite :complete
                        org-Notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("notecite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-notecite :complete
                        org-notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footfullcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-footfullcite
                        :complete org-footfullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("fullcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-fullcite :complete
                        org-fullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeurl" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citeurl :complete
                        org-citeurl-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citedate*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citedate*
                        :complete org-citedate*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citedate" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citedate :complete
                        org-citedate-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citetitle*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citetitle*
                        :complete org-citetitle*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citetitle" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citetitle
                        :complete org-citetitle-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citeauthor*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Citeauthor*
                        :complete org-Citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Autocite*
                        :complete org-Autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("autocite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-autocite*
                        :complete org-autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Autocite :complete
                        org-Autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("autocite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-autocite :complete
                        org-autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("supercite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-supercite
                        :complete org-supercite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("parencite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-parencite*
                        :complete org-parencite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("cite*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-cite* :complete
                        org-cite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Smartcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Smartcite
                        :complete org-Smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("smartcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-smartcite
                        :complete org-smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Textcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Textcite :complete
                        org-Textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("textcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-textcite :complete
                        org-textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcitetext" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-footcitetext
                        :complete org-footcitetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-footcite :complete
                        org-footcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Parencite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Parencite
                        :complete org-Parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("parencite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-parencite
                        :complete org-parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Cite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Cite :complete
                        org-Cite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citeauthor" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Citeauthor
                        :complete org-Citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citealp" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Citealp :complete
                        org-Citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citealt" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Citealt :complete
                        org-Citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citep" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Citep :complete
                        org-Citep-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citet" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-Citet :complete
                        org-Citet-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyearpar" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citeyearpar
                        :complete org-citeyearpar-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyear*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citeyear*
                        :complete org-citeyear*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyear" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citeyear :complete
                        org-citeyear-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeauthor*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citeauthor*
                        :complete org-citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeauthor" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citeauthor
                        :complete org-citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citetext" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citetext :complete
                        org-citetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citenum" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citenum :complete
                        org-citenum-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealp*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citealp* :complete
                        org-citealp*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealp" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citealp :complete
                        org-citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealt*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citealt* :complete
                        org-citealt*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealt" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citealt :complete
                        org-citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citep*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citep* :complete
                        org-citep*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citep" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citep :complete
                        org-citep-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citet*" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citet* :complete
                        org-citet*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citet" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-citet :complete
                        org-citet-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("nocite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-nocite :complete
                        org-nocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("cite" :follow (lambda (_) (funcall org-ref-cite-onclick-function nil)) :export org-ref-format-cite :complete
                        org-cite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let ((s (org-ref-format-entry (org-ref-get-bibtex-key-under-cursor))))
                            (with-temp-buffer (insert s) (fill-paragraph) (buffer-string)))
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full :keymap
                        (keymap (tab lambda nil (interactive) (funcall org-ref-insert-cite-function)) (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive) (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive) (org-ref-swap-citation-link -1)) (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil "Paste key at point. Assumes the first thing in the killring is a key." (interactive)
                          (org-ref-insert-key-at-point (car kill-ring)))
                         (16777303 lambda nil "Copy all the keys at point." (interactive)
                          (kill-new (org-element-property :path (org-element-context))))
                         (16777335 lambda nil (interactive) (kill-new (car (org-ref-get-bibtex-key-and-file))))
                         (16777318 lambda nil (interactive)
                          (save-excursion (org-ref-open-citation-at-point) (kill-new (org-ref-format-bibtex-entry-at-point))))
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point" (interactive) (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point) (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point) (16777328 . org-ref-open-pdf-at-point)
                         (16777333 . org-ref-open-url-at-point) (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body) (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        :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\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!\303\304\305	\211\306U\204\0	\307V\203\0\310\202\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\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 \304\305!r\nq\210\306\216	c\210\307 \210\310 -\207"
                          [position s temp-buffer org-ref-link-message generate-new-buffer " *temp*"
                           #[nil "\301\b!\205	\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	\300\302!\207" [format latex "\\listoftables"] 2])
                       ("list-of-figures" :follow org-ref-list-of-figures :export
                        #[(keyword desc format) "\b\301=\205	\300\302!\207" [format latex "\\listoffigures"] 2])
                       ("addbibresource" :follow org-ref-follow-addbibresource :export
                        #[(keyword desc format) "\b\302\267\202\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\b\303=\203\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\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 \304\305!r\nq\210\306\216	c\210\307 \210\310 -\207"
                          [position s temp-buffer org-ref-link-message generate-new-buffer " *temp*"
                           #[nil "\301\b!\205	\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=\203\0\302\303\300A#\207\302\304\226\"\207" [("Acp" . "Glspl") latex 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=\203\0\302\303\300A#\207\302\304\226\"\207" [("acp" . "glspl") latex 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=\203\0\302\303\300A#\207\302\304\226\"\207" [("Ac" . "Gls") latex 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=\203\0\302\303\300A#\207\302\304\226\"\207" [("ac" . "gls") latex 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=\203\0\302\303\300A#\207\302\304\226\"\207"
                          [("acrfull" . "acrfull") latex 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=\203\0\302\303\300A#\207\302\304\226\"\207"
                          [("acrlong" . "acrlong") latex 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=\203\0\302\303\300A#\207\302\304\226\"\207"
                          [("acrshort" . "acrshort") latex 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=\203\f\301\302\x04#\207\301\303\"\207" [latex 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=\203\f\302\303\300#\207\302\304\"\207" ["glsdesc" latex 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=\203\f\302\303\300#\207\302\304\"\207" ["glssymbol" latex 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=\203\f\302\303\300#\207\302\304\"\207" ["Glspl" latex 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=\203\f\302\303\300#\207\302\304\"\207" ["Gls" latex 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=\203\f\302\303\300#\207\302\304\"\207" ["glspl" latex 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=\203\f\302\303\300#\207\302\304\"\207" ["gls" latex format "\\%s{%s}" "%s"] 7
                          "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("bibtex" :follow org-bibtex-open :store org-bibtex-store-link)
                       ("attachment" :follow org-attach-follow :complete org-attach-complete-link) ("id" :follow org-id-open)
                       ("researcherid" :follow
                        #[257 "\300\301\302\"!\207" [browse-url format "http://www.researcherid.com/rid/%s"] 5 "\n\n(fn LINK-STRING)"]
                        :export
                        #[771 "\211\300=\205\0\301\302\x04\206\0#\207"
                          [html format "<a href=\"http://www.researcherid.com/rid/%s\">ResearcherID:%s</a>"] 7 "\n\n(fn KEYWORD DESC FORMAT)"]
                        )
                       ("orcid" :follow #[257 "\300\301\302\"!\207" [browse-url format "http://orcid.org/%s"] 5 "\n\n(fn LINK-STRING)"]
                        :export
                        #[771 "\211\300=\205\0\301\302\x04\206\0#\207" [html format "<a href=\"http://orcid.org/%s\">orcid:%s</a>"] 7
                          "\n\n(fn KEYWORD DESC FORMAT)"]
                        )
                       ("file+sys") ("file+emacs") ("shell" :follow org-link--open-shell)
                       ("news" :follow #[514 "\301\300\302Q\"\207" ["news" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("mailto" :follow #[514 "\301\300\302Q\"\207" ["mailto" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("https" :follow #[514 "\301\300\302Q\"\207" ["https" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("http" :follow #[514 "\301\300\302Q\"\207" ["http" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("ftp" :follow #[514 "\301\300\302Q\"\207" ["ftp" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("help" :follow org-link--open-help) ("file" :complete org-link-complete-file) ("elisp" :follow org-link--open-elisp)
                       ("doi" :follow doi-link-menu :export
                        #[(doi desc format)
                          "\b\304\267\202 \300\305	\n\v\206\0\306\nP$\207\300\307	\n\v\206\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]
                        )
                       )
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-capture-templates '(("h" "Hg options")
                         ("hi" "Hg Issues" entry
                          (file+headline "~/ALLES/HGs/Karp/Pub/Published/ContFlowMap/Issues.org" "HG:Issues:ContFlowMap")
                          "* TODO %^{Task} %T : %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("m" "Mail options")
                         ("me" "Est+Num" entry (file+headline "~/ALLES/HGs/tex/vorlesungen/HGQuim-Num-Estad/Hojas.org" "Examen")
                          "* %T %^{Title} : %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("mi" "mailimportant" entry (file+headline "~/ALLES/Mail/README.org" "Important Mail")
                          "* TODO %^{Task} %T : %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("mt" "Tutorials" entry (file+headline "~/Desktop/Grupos-Annu/tutorias.org" "Tutorials")
                          "* TODO %^{Task} %T : %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("ml" "maillavi" entry (file+headline "~/ALLES/HGs/Karp/Pub/Letter.org" "To the Editor")
                          "* %T %^{Title} : %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("mr" "MailMathRev" entry (file+headline "~/ALLES/MathRev/ToDo/TODO.org" "To the Editor")
                          "* TODO %T  %^{Task} : %:subject %^G\nSCHEDULED: %t\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i" :kill-buffer t)
                         ("r" "Reply" entry (file+headline "~/Mail/TODO-email.org" "Emails") "** %T REPLY %a %?" :gnus-attachments t)
                         ("l" "LaTeX(headline) Generic README.org" entry
                          (file+headline (lambda nil (expand-file-name (read-file-name "Name of file (curr dir;headline-format format)!: ")))
                           "Overview")
                          "* TODO %?, %^g %^{prompt} Link: %A\n\n %i")
                         ("K" "Contacts" entry (file "~/ALLES/contacts.org")
                          "* %(org-contacts-template-name)\n:PROPERTIES:\n:EMAIL: %(org-contacts-template-email)\n:PHONE:\n:ALIAS:\n:NICKNAME:\n:IGNORE:\n:ICON:\n:NOTE:\n:ADDRESS:\n:BIRTHDAY:\n:END:")
                         ("j" "Journal Entry" entry (file+olp+datetree "~/ALLES/journal.org") "* %?" :empty-lines 1)
                         ("X" "ChangeLog README" entry (file+olp+datetree "./README.org") "* %? \n   %U \n %f" :prepend t)
                         ("G" "Generic README.org file (table format)" table-line
                          (file+headline (lambda nil (expand-file-name (read-file-name "Name of file (curr dir;table format)!: "))) "Overview")
                          "|%f| %U|%A|" :prepend t)
                         ("w" "Web site" entry (file "/home/oub/ALLES/download.org") "* %a :website:\n\n%U %?\n\n%:initial"))
 org-agenda-file-regexp "\\`[^.].*\\.org\\|.todo\\'"
 org-link-elisp-confirm-function 'yes-or-no-p
 org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
 org-tab-before-tab-emulation-hook '(org-tempo-complete-tag)
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 outline-mode-hook '(hide-body)
 org-latex-packages-alist '(("numbered,framed" "matlab-prettifier" t))
 org-image-actual-width 400
 org-display-custom-times t
 org-export-with-toc nil
 org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
 org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}" ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("article" "\\documentclass[11pt]{article}" ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
                      ("\\paragraph{%s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
                     ("report" "\\documentclass[11pt]{report}" ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("exam" "\\documentclass[12pt, addpoints, answers]{exam}"
                      ("\\begin{questions}%%%s" "\\end{questions}" "\\begin{questions}%%%s" "\\end{questions}") ("\\titledquestion{%s}" . "")
                      ("\\begin{parts}%%%s" "\\end{parts}" "\\begin{parts}%%%s" "\\end{parts}") ("\\part[%s] " . "")
                      ("\\begin{subparts}%%%s" "\\end{subparts}" "\\begin{subparts}%%%s" "\\end{subparts}") ("\\subpart[%s] " . "")
                      ("\\begin{solution}[%s]" "\\end{solution}" "\\begin{solution}[%s]" "\\end{solution}")
                      ("\\begin{solutionorbox}[%s]" "\\end{solutionorbox}" "\\begin{solutionorbox}[%s]" "\\end{solutionorbox}"))
                     )
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-entities-user '(("implies" "\\Rightarrow" t "&rArr;" "=>" "=>" "⇒") ("iff" "\\iff" t "&hArr;" "<=>" "<=>" "⇔"))
 org-link-from-user-regexp "\\<oub@Utnapischtim\\>\\|\\<Uwe Brauer\\>"
 org-ref-notes-function 'org-ref-notes-function-one-file
 org-latex-listings-options '(("style" "Matlab-editor") ("basicstyle" "\\mlttfamily") ("escapechar" "\"") ("mlshowsectionrules" "true")
                              ("mathescape" "true") ("morecomment" "[s]{\\%\\{}{\\%\\}}"))
 org-use-speed-commands t
 org-ref-formatted-citation-backend "org"
 org-odt-convert-processes '(("gnumeric" "/usr/bin/ssconvert %i %o"))
 org-list-allow-alphabetical t
 )

[-- Attachment #2: sort-table-bug.txt --]
[-- Type: text/plain, Size: 964 bytes --]

Debugger entered--Lisp error: (args-out-of-range 173 173)
  get-text-property(173 org-ref-label)
  org-ref-delete-labels(174 174)
  insert-buffer-substring(#<buffer  *temp*>)
  sort-reorder-buffer(((6 678 . 719) (7 636 . 677) (11 720 . 761) (12 426 . 467) (15 468 . 509) (25 216 . 257) (27 384 . 425) (30 174 . 215) (33 342 . 383) (39 510 . 551) (41 552 . 593) (45 300 . 341) (49 594 . 635) (51 258 . 299)) ((30 174 . 215) (25 216 . 257) (51 258 . 299) (45 300 . 341) (33 342 . 383) (27 384 . 425) (12 426 . 467) (15 468 . 509) (39 510 . 551) (41 552 . 593) (49 594 . 635) (7 636 . 677) (6 678 . 719) (11 720 . 761)))
  sort-subr(nil #f(compiled-function () #<bytecode -0x170abd17f16116a6>) end-of-line #f(compiled-function () #<bytecode -0x1dd9a59d512caea3>) nil <)
  org-table-sort-lines(nil nil nil nil t)
  funcall-interactively(org-table-sort-lines nil nil nil nil t)
  call-interactively(org-table-sort-lines nil nil)
  command-execute(org-table-sort-lines)

             reply	other threads:[~2020-08-10 18:25 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2020-08-10 17:45 Uwe Brauer [this message]
2020-08-13  9:20 ` Bug: org-table-sort-lines returns error [9.3.7 (release_9.3.7-705-gea9463 @ /home/oub/emacs/site-lisp/packages/org/)] Nicolas Goaziou
2020-08-13 11:50   ` Uwe Brauer
2020-08-13 12:03   ` Uwe Brauer
2020-08-13 13:18     ` Charles Millar

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87o8ni8kes.fsf@mat.ucm.es \
    --to=oub@mat.ucm.es \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
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).