all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
@ 2021-10-23  6:42 Uwe Brauer
  2021-10-24 11:00 ` Kévin Le Gouguec
  0 siblings, 1 reply; 13+ messages in thread
From: Uwe Brauer @ 2021-10-23  6:42 UTC (permalink / raw)
  To: emacs-orgmode

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain; charset=utf-8, Size: 361775 bytes --]



Hi 

In the attached file I do:



    M-: (setq org-adapt-indentation 'headline-data)
    C-x h
    M-: (indent-for-tab-command)

Result 

 the :PROPERTIES: drawer is not indented.


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 2021-07-31
Package: Org mode version 9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)

current state:
==============
(setq
 org-html-with-latex 'mathjax
 org-link-elisp-confirm-function 'yes-or-no-p
 org-odt-inline-image-rules '(("file" .
                               "\\(?:\\.\\(?:gif\\|\\(?:jpe?\\|pn\\|sv\\)g\\)\\)")
                              )
 org-odt-convert-process "gnumeric"
 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\\usepackage{wasysym}\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-ref-cite-onclick-function 'org-ref-cite-onclick-minibuffer-menu
 org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
                              (insert
                               (format "cite:%s\n"
                                (org-entry-get (point) "CUSTOM_ID"))
                               )
                              )
                             )
 org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
 org-ref-insert-cite-function 'org-ref-insert-cite-link
 org-ref-insert-cite-key "C-c c"
 org-latex-impatient-tex2svg-bin "~/node_modules/mathjax-node-cli/bin/tex2svg"
 org-ref-open-notes-function '(lambda nil (org-show-entry)
                               (outline-show-branches)
                               (outline-show-children)
                               (org-cycle '(64))
                               (recenter-top-bottom 0))
 org-load-hook '(my-link-keys org-insert-dblock-bindings
                 org-insert-dblock-bindings)
 org-pretty-table-mode-hook '(org-pretty-table-mode-set-explicitly)
 org-ref-show-citation-on-enter nil
 org-startup-folded nil
 org-babel-after-execute-hook '(org-display-inline-images)
 org-agenda-files '("/home/oub/ALLES/HGs/tex/vorlesungen/HGMasterIQ/pdfs/MasterIngQimBooks/bib1.org" "/home/oub/ALLES/Mail/README.org" "/home/oub/ALLES/HGs/tex/vorlesungen/Tutorias/tutorias.org" "/home/oub/answer.org")
 org-capture-templates '(("l" "Ledger entries")
                         ("lm" "MBNA" plain (file "~/personal/ledger")
                          "%(org-read-date) %^{Payee}\n  Liabilities:MBNA  \n  Expenses:%^{Account}  %^{Amount}")
                         ("lc" "Cash" plain (file "~/personal/ledger")
                          "%(org-read-date) * %^{Payee}\n  Expenses:Cash \n  Expenses:%^{Account}  %^{Amount}")
                         ("h" "Hg options")
                         ("hi" "Hg Issues" entry
                          (file+headline
                           "~/ALLES/HGs/Karp/Pub/Published/ContFlowMap/Issues.org" "HG:Issues:ContFlowMap")
                          "* TODO %^{Task} %T : %:from %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("m" "Mail options")
                         ("mE" "Est+Num Just Emails" entry
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGQuim-Num-Estad/Hojas.org" "Examen")
                          "* TODO %^{Task} %T : %:from: %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("mc" "Stat+Num:Covid19" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGCal-Num-Transp/alumnos-covid19.org" "Casos de Covid19")
                          "| | %:fromname|%:fromaddress|%^{caso|positivo|contacto-estrecho}|%^{Grupo|A|B|C|D|E|F} | | |  %a|%:date " :prepend t)
                         ("mk" "Annu Grupos" entry
                          (file
                           "~/ALLES/HGs/tex/vorlesungen/HGAnnu/grupos2021.org")
                          "* TODO %^{Grupo} %T %^g %(org-contacts-template-name)\n         :PROPERTIES:\n         :ID:       \n         :EMAIL: %(org-contacts-template-email)\n         :Grp1:     %^{Gr1|Gr2|Gr3|Gr4|Gr6|Gr7}\n         :Usuario1: %:fromname\n         :email1: %:fromaddress\n         :Usuario2: %(my-extract-cc)\n         :email2: \n         :Usuario3: \n         :email3: \n         :Usuario4: \n         :Start:  \n         :End:    \n         :STATUS:   [ ]\n         :ST1:      [ ]\n         :Hoja:     \n         :Ej:       \n         :END:")
                         ("mm" "Annu Ejercios" entry
                          (file
                           "~/ALLES/HGs/tex/vorlesungen/HGAnnu/grupos2021.org")
                          "* TODO %^{Grupo} %T %^g %(org-contacts-template-name)\n         :PROPERTIES:\n         :ID:       \n         :EMAIL: %(org-contacts-template-email)\n         :Grp1:     %^{Gr1|Gr2|Gr3|Gr4|Gr6|Gr7}\n         :Usuario1: %:fromname\n         :email1: %:fromaddress\n         :Speaker: %^{Speaker}\n         :email2: \n         :Start: %:date  \n         :End:    \n         :STATUS:   [ ]\n         :ST1:      [ ]\n         :Hoja: %^{Hoja}    \n         :Ej:   %^{Ejercico}    \n         :END:")
                         ("mM" "Annu:Matlab-Ejercicios" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGAnnu/matlab-ejercicios.org" "Ejercicios de Matlab")
                          "|%:fromname|%:fromaddress|%^{Hoja|1|2|3|4|5|6|7|8|9} |[ ] | | | %a|%:date" :prepend t)
                         ("mu" "Stat+Num:Exercises English" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGQuim-Num-Estad/Lista-Alumnos/2021/GroupE/exercises-groupE-21.org" "Exercise Group-E")
                          "| %:fromname|%:fromaddress  |%^{Sheet|1|2|3|4|5|6}|%^{Exercise|1|} |  %a|%:date | " :prepend t)
                         ("mG"
                          "Ejercicios Annu21: hechos, solicitados y asignados"
                          table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGAnnu/Ejercios-Alumnos-Grupos/2021/Ejercios-Teoria21.org" "Ejercicios Annu21: hechos, solicitados y asignados")
                          "| |%^{Grp|1|2|3|4|5|6|7|8}  |%^{Hj|1|2|3|4|5|6|7} |%^{Ej-As|1|2|3|4|5} |%^{Tit}| | [] | |   | %:fromname| |%:fromaddress |  %(my-extract-cc)  |%:subject | %:date |%a | " :prepend t :empty-lines 1 :unnarrowed t)
                         ("mt" "Tutorias" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/Tutorias/tutorias-table.org" "Tutorias/Tutorials")
                          "| |%^{Asignatura/Subject|Annu21|Stat21|Estad21}  |%^{Fecha/Date} |%^{Teams}   | %:fromname| %:fromaddress   |%:subject | %:date |%a | " :prepend t :empty-lines 1 :unnarrowed t)
                         ("me" "Examen Matlab" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/Tutorias/examen-matlab.org" "Examen Matlab: Personas que han confirmado su presencia")
                          "| |%^{Asignatura/Subject|Annu21}  |[X]   | %:fromname| %:fromaddress   |%:subject | %:date |%a | " :prepend t :empty-lines 1 :unnarrowed t)
                         ("mz" "Examen Zip" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/Tutorias/examen-matlab-zip.org" "Examen Matlab: Zips")
                          "| |%^{Asignatura/Subject|Annu21}  |[X]   | %:fromname| %:fromaddress   |%:subject | %:date |%a | " :prepend t :empty-lines 1 :unnarrowed t)
                         ("s" "timeslip" table-line
                          (file "/home/oub/timeslips.org")
                          "| %(org-read-date)| %^{FileName} %i|\n    	          %^{Narrative} %i| %^{Time} %i| %^{Expense} %i" :empty-lines 1)
                         ("ms" "Estad+Num:Ejercicios Spanish"
                          table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGQuim-Num-Estad/Lista-Alumnos/2021/GroupA/ejercicios-grupoA-21.org" "Ejercicios Grupo A")
                          "| %:fromname|%:fromaddress|%^{Hoja|1|2|3|4|5|6}|%^{Ejercicio|1|} | %a |%:date " :prepend t)
                         ("mC" "Annu20:Covid19" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGAnnu/annu-covid19.org" "Cases of Covid19")
                          "| %:fromname|%:fromaddress|%^{caso|positivo|contact-estrecho}|   %a | %:date " :prepend t)
                         ("mf" "Annu20:No-Pres" table-line
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/HGAnnu/no-presencial.org" "Alumnos que no pueden venir")
                          "| %:fromname|%:fromaddress|%^{Como|tablet|pizarra|nada}|   %a|%:date " :prepend t)
                         ("mi" "mailimportant" entry
                          (file+headline "~/ALLES/Mail/README.org"
                           "Important Mail")
                          "* TODO %^{Task} %T : %:from %:subject %^G\n- From :: %:from\n- Subject :: %:subject\n- Date :: %:date\n- Email :: %a\n\n%?\n%i")
                         ("mT" "Tutorials" entry
                          (file+headline
                           "~/ALLES/HGs/tex/vorlesungen/Tutorias/tutorias.org" "Tutorials")
                          "* TODO %^{Task} %T : %:from %: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")
                          "* TODO %T  %:from %: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} : %:from %: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")
                          "* TODO %T REPLY %:from %:subject\n %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")
                         ("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-persist-after-read-hook '(org-element--cache-persist-after-read)
 org-ctrl-c-ctrl-c-hook '(org-fstree-apply-maybe)
 org-format-latex-options '(:foreground default :background default
                            :scale 1.5 :html-foreground "Black"
                            :html-background "Transparent" :html-scale
                            1 :matchers
                            ("begin" "$1" "$" "$$" "\\(" "\\["))
 org-time-stamp-custom-formats '(" %d.%m.%Y " . " %d.%m.%Y %a %H:%M ")
 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-ref-open-pdf-function 'org-ref-open-pdf-at-point
 org-export-before-parsing-hook '(org-ref-acronyms-before-parsing
                                  org-ref-glossary-before-parsing
                                  org-attach-expand-links)
 org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
 org-cycle-hook '(org-cycle-hide-archived-subtrees
                  org-cycle-hide-drawers org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-latex-listings-options '(("style" "Matlab-editor")
                              ("basicstyle" "\\mlttfamily")
                              ("escapechar" "\"")
                              ("mlshowsectionrules" "true")
                              ("mathescape" "true")
                              ("morecomment" "[s]{\\%\\{}{\\%\\}}"))
 org-persist-before-read-hook '(org-element--cache-persist-before-read)
 org-modules '(org-bibtex org-docview org-eww org-gnus org-info
               org-irc org-mhe org-rmail org-w3m org-bookmark)
 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-link-from-user-regexp "\\<oub@Utnapischtim\\>\\|\\<Uwe Brauer\\>"
 org-ref-notes-function 'org-ref-notes-function-one-file
 org-image-actual-width 400
 org-mode-hook '(org-mode-reftex-setup
                 #[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 my-org-keys turn-on-flyspell
                 turn-on-auto-capitalize-mode org-tempo-setup
                 turn-on-mysmiley 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-babel-load-languages '((emacs-lisp . t) (R . t))
 org-ref-insert-link-function 'org-ref-insert-cite-link
 org-export-headline-levels 7
 outline-minor-mode-hook '(outshine-mode
                           outshine--outline-minor-mode-hook)
 org-table-export-default-format "my-tbl-to-csv"
 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-ref-bibliography-notes '((expand-file-name
                               "~/ALLES/HGs/tex/bib/notes.org")
                              )
 outline-mode-hook '(hide-body)
 org-export-allow-bind-keywords t
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-latex-to-mathml-jar-file "/home/oub/ALLES/src/MathWeb/mathtoweb.jar"
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 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-reveal-start-hook '(org-decrypt-entry)
 org-tempo-keywords-alist '(("T" . "latex") ("i" . "index"))
 org-adapt-indentation 'headline-data
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 outline-isearch-open-invisible-function 'outline-isearch-open-invisible
 org-odt-schema-dir nil
 org-export-before-processing-hook '(f-ox-filter-table-column-del)
 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}")
                      )
                     ("subfiles" "\\documentclass[12pt]{subfiles}"
                      ("" . ""))
                     )
 org-gnus-prefer-web-links t
 org-highlight-latex-and-related '(latex)
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-use-speed-commands t
 org-ref-default-bibliography '((expand-file-name
                                 "~/ALLES/HGs/tex/bib/bibgraf.bib")
                                )
 org-protocol-protocol-alist '(("capture-html" :protocol
                                "capture-html" :function
                                org-protocol-capture-html--with-pandoc
                                :kill-client t)
                               )
 org-html-table-default-attributes '(:border "2" :cellspacing "0"
                                     :cellpadding "6" :frame "border"
                                     :rules "all")
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-capture-prepare-finalize-hook '(gnorb-registry-capture
                                     gnorb-org-capture-abort-cleanup)
 org-src-preserve-indentation t
 org-latex-packages-alist '(("numbered,framed" "matlab-prettifier" t))
 org-odt-convert-processes '(("gnumeric" "/usr/bin/ssconvert %i %o"))
 org-entities-user '(("implies" "\\Rightarrow" t "&rArr;" "=>" "=>"
                      "⇒")
                     ("iff" "\\iff" t "&hArr;" "<=>" "<=>" "⇔"))
 org-babel-tangle-lang-exts '(("D" . "d") ("C++" . "cpp")
                              ("ruby" . "rb") ("python" . "py")
                              ("latex" . "tex") ("emacs-lisp" . "el")
                              ("elisp" . "el"))
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
                     org-src-mode-configure-edit-buffer)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-todo-keywords '((sequence "TODO(t)" "WAIT(w@/!)" "|" "DONE(d@)"
                      "CANCELED(c@)")
                     )
 org-ref-formatted-citation-backend "org"
 org-mime-src-mode-hook '(org-mime-src-mode-configure-edit-buffer)
 org-latex-listings 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-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-structure-template-alist '(("A" . "export ascii")
                                ("C" . "comment")
                                ("g" .
                                 "src elisp :noexport\n            (setq  org-odt-convert-process \"gnumeric\")\n            (setq org-odt-convert-processes '((\"gnumeric\" \"/usr/bin/ssconvert %i %o\")))")
                                ("e" . "example")
                                ("G" .
                                 "* Group 2\n  :PROPERTIES:\n  :ID:       Group2\n  :COLUMNS:  %10Sheet(Sheet Nr) %10Ej(Exercise Nr)  %17Date(Date) %7STATUS(Status){X/}\n  :END:\n")
                                ("E" . "export") ("h" . "export html")
                                ("m" .
                                 "src matlab :tangle mieuler.m :exports code  :padline no :eval never-export")
                                ("M" .
                                 "src matlab :exports results :results output raw")
                                ("Q" . "quote") ("S" . "src")
                                ("o" .
                                 "src matlab :results output raw :exports code  :eval never-export")
                                ("s" .
                                 "matlab :results output latex :exports both :eval never-export")
                                ("f" . "fstree: [] :non-recursive t")
                                ("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 emacs-lisp :results silent :exports none\n(setq  org-odt-convert-process \"LibreOffice\")\n(setq org-odt-convert-processes\n'((\"LibreOffice\" \"/opt/libreoffice7.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")
                                ("B" .
                                 "* Issues (Open/All)\n   :PROPERTIES:\n   :COLUMNS:  %50ITEM(Problem) %10Is(Issue Nr) %7TODO(Status) %26TAGS(Which) %17Date(Date) %7STATUS(Status){X/} \n   :ID:       Issues\n   :END:\n** DONE Proposition9  : one more mistake                        :ContFlowMap:\n   :PROPERTIES:\n   :ID:       Issue:1\n   :Date:     <2020-07-26 Sun>\n   :STATUS:   [X]\n   :Is:       1\n   :END:\n#+BEGIN: columnview :hlines 1 :id \"Issues\" :indent nil  :format \"%50ITEM(Problem) %5Is(Issue) %12TODO %8TAGS(Repo) %12Date %7Status(Status){X/}\"\n#+END")
                                ("v" . "verse"))
 org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
 org-pretty-entities t
 org-ref-insert-ref-function 'org-insert-link
 org-speed-command-hook '(org-speed-command-activate
                          org-babel-speed-command-activate)
 org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-latex-prefer-user-labels t
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-enforce-todo-dependencies t
 org-export-with-email t
 org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
 org-ref-clean-bibtex-key-function '(lambda (key)
                                     (replace-regexp-in-string ":" ""
                                      key)
                                     )
 org-persist-before-write-hook '(org-element--cache-persist-before-write)
 org-tab-first-hook '(org-odt-update-locale
                      org-babel-hide-result-toggle-maybe
                      org-babel-header-arg-expand)
 org-export-with-toc nil
 org-link-shell-confirm-function 'yes-or-no-p
 org-agenda-finalize-hook '(gnorb-org-popup-bbdb
                            org-agenda-property-add-properties)
 org-ref-pdf-to-bibtex-function 'copy-file
 org-display-custom-times t
 org-babel-pre-tangle-hook '(save-buffer)
 org-agenda-loop-over-headlines-in-active-region nil
 org-capture-mode-hook '(gnorb-org-capture-function)
 org-occur-hook '(org-first-headline-recenter)
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-link-parameters '(("message" :follow org-mac-message-open)
                       ("x-devonthink-item" :follow
                        org-devonthink-item-open)
                       ("mac-evernote" :follow
                        org-mac-evernote-note-open)
                       ("mac-outlook" :follow
                        org-mac-outlook-message-open)
                       ("acrobat" :follow org-mac-acrobat-open)
                       ("skim" :follow org-mac-skim-open)
                       ("addressbook" :follow
                        org-mac-addressbook-item-open)
                       ("x-together-item" :follow
                        org-mac-together-item-open)
                       ("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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("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 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Autocites :complete
                        org-Autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("autocites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-autocites :complete
                        org-autocites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("supercites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-supercites :complete
                        org-supercites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Textcites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Textcites :complete
                        org-Textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("textcites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-textcites :complete
                        org-textcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Smartcites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Smartcites :complete
                        org-Smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("smartcites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-smartcites :complete
                        org-smartcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcitetexts" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-footcitetexts :complete
                        org-footcitetexts-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-footcites :complete
                        org-footcites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Parencites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Parencites :complete
                        org-Parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("parencites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-parencites :complete
                        org-parencites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Cites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Cites :complete
                        org-Cites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("cites" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-cites :complete
                        org-cites-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("fnotecite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-fnotecite :complete
                        org-fnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Pnotecite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Pnotecite :complete
                        org-Pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("pnotecite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-pnotecite :complete
                        org-pnotecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Notecite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Notecite :complete
                        org-Notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("notecite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-notecite :complete
                        org-notecite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footfullcite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-footfullcite :complete
                        org-footfullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("fullcite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-fullcite :complete
                        org-fullcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeurl" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citeurl :complete
                        org-citeurl-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citedate*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citedate* :complete
                        org-citedate*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citedate" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citedate :complete
                        org-citedate-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citetitle*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citetitle* :complete
                        org-citetitle*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citetitle" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citetitle :complete
                        org-citetitle-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citeauthor*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Citeauthor* :complete
                        org-Citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocite*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Autocite* :complete
                        org-Autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("autocite*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-autocite* :complete
                        org-autocite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Autocite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Autocite :complete
                        org-Autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("autocite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-autocite :complete
                        org-autocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("supercite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-supercite :complete
                        org-supercite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("parencite*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-parencite* :complete
                        org-parencite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("cite*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-cite* :complete
                        org-cite*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Smartcite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Smartcite :complete
                        org-Smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("smartcite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-smartcite :complete
                        org-smartcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Textcite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Textcite :complete
                        org-Textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("textcite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-textcite :complete
                        org-textcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcitetext" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-footcitetext :complete
                        org-footcitetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("footcite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-footcite :complete
                        org-footcite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Parencite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Parencite :complete
                        org-Parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("parencite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-parencite :complete
                        org-parencite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Cite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Cite :complete
                        org-Cite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citeauthor" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Citeauthor :complete
                        org-Citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citealp" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Citealp :complete
                        org-Citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citealt" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Citealt :complete
                        org-Citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citep" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Citep :complete
                        org-Citep-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("Citet" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-Citet :complete
                        org-Citet-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyearpar" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citeyearpar :complete
                        org-citeyearpar-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyear*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citeyear* :complete
                        org-citeyear*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeyear" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citeyear :complete
                        org-citeyear-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeauthor*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citeauthor* :complete
                        org-citeauthor*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citeauthor" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citeauthor :complete
                        org-citeauthor-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citetext" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citetext :complete
                        org-citetext-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citenum" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citenum :complete
                        org-citenum-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealp*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citealp* :complete
                        org-citealp*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealp" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citealp :complete
                        org-citealp-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealt*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citealt* :complete
                        org-citealt*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citealt" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citealt :complete
                        org-citealt-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citep*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citep* :complete
                        org-citep*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citep" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citep :complete
                        org-citep-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citet*" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citet* :complete
                        org-citet*-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("citet" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-citet :complete
                        org-citet-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("nocite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-nocite :complete
                        org-nocite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        )
                       ("cite" :follow
                        (lambda (_)
                         (funcall org-ref-cite-onclick-function nil))
                        :export org-ref-format-cite :complete
                        org-cite-complete-link :help-echo
                        (lambda (window object position)
                         (when org-ref-show-citation-on-enter
                          (save-excursion (goto-char position)
                           (let
                            ((s
                              (org-ref-format-entry
                               (org-ref-get-bibtex-key-under-cursor))
                              )
                             )
                            (with-temp-buffer (insert s)
                             (fill-paragraph) (buffer-string))
                            )
                           )
                          )
                         )
                        :face org-ref-cite-link-face-fn :display full
                        :keymap
                        (keymap
                         (tab lambda nil (interactive)
                          (funcall org-ref-insert-cite-function))
                         (S-up . org-ref-sort-citation-link)
                         (S-right lambda nil (interactive)
                          (org-ref-swap-citation-link 1))
                         (S-left lambda nil (interactive)
                          (org-ref-swap-citation-link -1))
                         (C-right . org-ref-next-key)
                         (C-left . org-ref-previous-key)
                         (16777337 lambda nil
                          "Paste key at point. Assumes the first thing in the killring is a key."
                          (interactive)
                          (org-ref-insert-key-at-point (car kill-ring))
                          )
                         (16777303 lambda nil
                          "Copy all the keys at point." (interactive)
                          (kill-new
                           (org-element-property :path
                            (org-element-context))
                           )
                          )
                         (16777335 lambda nil (interactive)
                          (kill-new
                           (car (org-ref-get-bibtex-key-and-file)))
                          )
                         (16777318 lambda nil (interactive)
                          (save-excursion
                           (org-ref-open-citation-at-point)
                           (kill-new
                            (org-ref-format-bibtex-entry-at-point))
                           )
                          )
                         (16777319 . org-ref-google-scholar-at-point)
                         (16777317 lambda nil "Email entry at point"
                          (interactive)
                          (org-ref-open-citation-at-point)
                          (org-ref-email-bibtex-entry))
                         (16777315 . org-ref-wos-citing-at-point)
                         (16777330 . org-ref-wos-related-at-point)
                         (16777326 . org-ref-open-notes-at-point)
                         (16777328 lambda nil (interactive)
                          (funcall org-ref-open-pdf-function))
                         (16777333 . org-ref-open-url-at-point)
                         (16777314 . org-ref-open-citation-at-point)
                         (16777327 . org-ref-cite-hydra/body)
                         (follow-link . mouse-face)
                         (mouse-3 . org-find-file-at-mouse)
                         (mouse-2 . org-open-at-mouse))
                        :store org-ref-bibtex-store-link)
                       ("Cref" :follow org-ref-ref-follow :export
                        org-ref-Cref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "Cref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("cref" :follow org-ref-ref-follow :export
                        org-ref-cref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "cref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("autoref" :follow org-ref-ref-follow :export
                        org-ref-autoref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "autoref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("eqref" :follow org-ref-ref-follow :export
                        org-ref-eqref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "eqref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("nameref" :follow org-ref-ref-follow :export
                        org-ref-export-nameref :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "nameref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("pageref" :follow org-ref-ref-follow :export
                        #[(path desc format)
                          "\b\302\267\202€\300\303	\"\207\300\304	\"\207\305\207"
                          [format
                           
                                                                                         path
                           
                                                                                         #s
                           
                                                                                         (hash-table
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        size
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        2
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        test
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        eq
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        rehash-size
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        1.5
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        rehash-threshold
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        0.8125
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        purecopy
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        t
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        data
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        (html 6 latex 11)
                                                                                          
                                                                                          
                                                                                          
                                                                                          
                                                                                            
                                                                                                 
                                                                                                        )
                           
                                                                                         "(<pageref>%s</pageref>)" "\\pageref{%s}" nil]
                          3]
                        :face org-ref-ref-face-fn :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "pageref"] 3]
                        :help-echo org-ref-ref-help-echo)
                       ("ref" :follow org-ref-ref-follow :export
                        org-ref-ref-export :complete
                        #[(&optional arg) "\301\b\302\"\207"
                          [arg org-ref-complete-link "ref"] 3]
                        :face org-ref-ref-face-fn :help-echo
                        org-ref-ref-help-echo)
                       ("label" :follow
                        #[(label)
                          "\302\b!\303\304\305	\211\306U\204€	\307V\203€\310\202€\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€\300\303	\"\207\300\304	\"\207\300\305	\"\207\306\207"
                          [format
                           
                                                                                                         keyword
                           
                                                                                                         #s
                           
                                                                                                         (hash-table
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           size
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           3
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           test
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           eq
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           rehash-size
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           1.5
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           rehash-threshold
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           0.8125
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           purecopy
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           t
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           data
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           (html 6 md 11 latex 16)
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                          
                                                                                                            
                                                                                                                    
                                                                                                                           )
                           
                                                                                                         "<div id=\"%s\"></div>" "<a name=\"%s\"></a>" "\\label{%s}" nil]
                          3]
                        :store org-ref-label-store-link :face
                        org-ref-label-face-fn :help-echo
                        #[(window object position)
                          "\212\bb\210\303 \304\305\306\"r\nq\210\307\216	c\210\310 \210\311 -\207"
                          [position
                           
                                                                                                           s
                           
                                                                                                           temp-buffer
                           
                                                                                                           org-ref-link-message
                           
                                                                                                           generate-new-buffer
                           
                                                                                                           " *temp*"
                           
                                                                                                           t
                           
                                                                                                           #[nil
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                               
                                                                                                                         
                                                                                                                                             
                                                                                                                                                                  
                                                                                                                                                                              
                                                                                                                                                                                
                                                                                                                                                                                         "\301\b!\205	\302\b!\207"
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                               
                                                                                                                         
                                                                                                                                             
                                                                                                                                                                  
                                                                                                                                                                              
                                                                                                                                                                                
                                                                                                                                                                                         [temp-buffer buffer-name kill-buffer]
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                               
                                                                                                                         
                                                                                                                                             
                                                                                                                                                                  
                                                                                                                                                                              
                                                                                                                                                                                
                                                                                                                                                                                         2]
                           
                                                                                                           fill-paragraph buffer-string]
                          3]
                        )
                       ("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€\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€\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€\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\306\"r\nq\210\307\216	c\210\310 \210\311 -\207"
                          [position
                           
                                                                                                           s
                           
                                                                                                           temp-buffer
                           
                                                                                                           org-ref-link-message
                           
                                                                                                           generate-new-buffer
                           
                                                                                                           " *temp*"
                           
                                                                                                           t
                           
                                                                                                           #[nil
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                               
                                                                                                                         
                                                                                                                                             
                                                                                                                                                                  
                                                                                                                                                                              
                                                                                                                                                                                
                                                                                                                                                                                         "\301\b!\205	\302\b!\207"
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                               
                                                                                                                         
                                                                                                                                             
                                                                                                                                                                  
                                                                                                                                                                              
                                                                                                                                                                                
                                                                                                                                                                                         [temp-buffer buffer-name kill-buffer]
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                             
                                                                                                               
                                                                                                                         
                                                                                                                                             
                                                                                                                                                                  
                                                                                                                                                                              
                                                                                                                                                                                
                                                                                                                                                                                         2]
                           
                                                                                                           fill-paragraph buffer-string]
                          3]
                        :face org-ref-bibliography-face-fn)
                       ("Acp" :follow or-follow-acronym :face
                        org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771
                          "\211\301>\203€\302\303\300A#\207\302\304\226\"\207"
                          [("Acp" . "Glspl")
                           
                                                                                       (latex beamer)
                           
                                                                                       format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acp" :follow or-follow-acronym :face
                        org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771
                          "\211\301>\203€\302\303\300A#\207\302\304\226\"\207"
                          [("acp" . "glspl")
                           
                                                                                       (latex beamer)
                           
                                                                                       format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Ac" :follow or-follow-acronym :face
                        org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771
                          "\211\301>\203€\302\303\300A#\207\302\304\226\"\207"
                          [("Ac" . "Gls")
                           
                                                                                       (latex beamer)
                           
                                                                                       format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("ac" :follow or-follow-acronym :face
                        org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771
                          "\211\301>\203€\302\303\300A#\207\302\304\226\"\207"
                          [("ac" . "gls")
                           
                                                                                       (latex beamer)
                           
                                                                                       format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrfull" :follow or-follow-acronym :face
                        org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771
                          "\211\301>\203€\302\303\300A#\207\302\304\226\"\207"
                          [("acrfull" . "acrfull")
                           
                                                                                       (latex beamer)
                           
                                                                                       format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrlong" :follow or-follow-acronym :face
                        org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771
                          "\211\301>\203€\302\303\300A#\207\302\304\226\"\207"
                          [("acrlong" . "acrlong")
                           
                                                                                       (latex beamer)
                           
                                                                                       format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("acrshort" :follow or-follow-acronym :face
                        org-ref-acronym-face-fn :help-echo
                        or-acronym-tooltip :export
                        #[771
                          "\211\301>\203€\302\303\300A#\207\302\304\226\"\207"
                          [("acrshort" . "acrshort")
                           
                                                                                       (latex beamer)
                           
                                                                                       format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glslink" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771
                          "\211\300>\203\f\301\302\x04#\207\301\303\"\207"
                          [(latex beamer)
                           
                                                                                format "\\glslink{%s}{%s}" "%s"]
                          7 "\n\n(fn PATH DESC FORMAT)"]
                        )
                       ("glsdesc" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771
                          "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["glsdesc"
                           
                                                                                  (latex beamer)
                           
                                                                                  format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glssymbol" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771
                          "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["glssymbol"
                           
                                                                                  (latex beamer)
                           
                                                                                  format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Glspl" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771
                          "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["Glspl"
                           
                                                                                  (latex beamer)
                           
                                                                                  format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("Gls" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771
                          "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["Gls"
                           
                                                                                  (latex beamer)
                           
                                                                                  format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("glspl" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771
                          "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["glspl"
                           
                                                                                  (latex beamer)
                           
                                                                                  format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("gls" :follow or-follow-glossary :face
                        org-ref-glossary-face-fn :help-echo
                        or-glossary-tooltip :export
                        #[771
                          "\211\301>\203\f\302\303\300#\207\302\304\"\207"
                          ["gls"
                           
                                                                                  (latex beamer)
                           
                                                                                  format "\\%s{%s}" "%s"]
                          7 "\n\n(fn PATH _ FORMAT)"]
                        )
                       ("doi" :follow doi-link-menu :export
                        (lambda (doi desc format)
                         (cond
                          ((eq format 'html)
                           (format "<a href=\"%s%s\">%s</a>"
                            doi-utils-dx-doi-org-url doi
                            (or desc (concat "doi:" doi)))
                           )
                          ((eq format 'latex)
                           (format "\\href{%s%s}{%s}"
                            doi-utils-dx-doi-org-url doi
                            (or desc (concat "doi:" doi)))
                           )
                          )
                         )
                        )
                       ("bibtex" :follow org-bibtex-open :store
                        org-bibtex-store-link)
                       ("attachment" :follow org-attach-follow
                        :complete org-attach-complete-link)
                       ("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€\301\302\x04\206€#\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€\301\302\x04\206€#\207"
                          [html format
                           "<a href=\"http://orcid.org/%s\">orcid:%s</a>"]
                          7 "\n\n(fn KEYWORD DESC FORMAT)"]
                        )
                       ("id" :follow org-id-open) ("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 :store
                        org-link--store-help)
                       ("file" :complete org-link-complete-file)
                       ("elisp" :follow org-link--open-elisp))
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-ref-insert-label-function 'org-insert-link
 org-startup-with-inline-images t
 org-pre-cycle-hook '(org-fstree-show-entry-maybe)
 org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
 org-blank-before-new-entry '((heading . auto) (plain-list-item))
 org-agenda-file-regexp "\\`[^.].*\\.org\\|.todo\\'"
 org-annotate-file-add-search t
 org-return-follows-link t
 org-odt-convert-capabilities '(("Text"
                                 ("odt" "ott" "doc" "rtf" "docx")
                                 (("pdf" "pdf") ("odt" "odt")
                                  ("rtf" "rtf") ("ott" "ott")
                                  ("doc" "doc" ":\"MS Word 97\"")
                                  ("docx" "docx") ("html" "html"))
                                 )
                                ("Web" ("html")
                                 (("pdf" "pdf") ("odt" "odt")
                                  ("html" "html"))
                                 )
                                ("Spreadsheet"
                                 ("ods" "ots" "xls" "csv" "xlsx")
                                 (("pdf" "pdf") ("ots" "ots")
                                  ("html" "html") ("csv" "csv")
                                  ("ods" "ods") ("xls" "xls")
                                  ("xlsx" "xlsx"))
                                 )
                                ("Presentation"
                                 ("odp" "otp" "ppt" "pptx")
                                 (("pdf" "pdf") ("swf" "swf")
                                  ("odp" "odp") ("otp" "otp")
                                  ("ppt" "ppt") ("pptx" "pptx")
                                  ("odg" "odg"))
                                 )
                                )
 org-src-lang-modes '(("jupyter-matlab" . matlab)
                      ("jupyter-octave" . octave)
                      ("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-tab-before-tab-emulation-hook '(org-tempo-complete-tag)
 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}).")
                                       ("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}).")
                                       ("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}).")
                                       ("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}).")
                                       ("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}).")
                                       ("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}).")
                                       ("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}).")
                                       ("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-list-allow-alphabetical t
 org-latex-to-mathml-convert-command "java -jar %j -unicode -force -df %o %I"
 org-latex-impatient-scale 2
 )

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: grupos2021.org --]
[-- Type: text/x-org, Size: 1172 bytes --]

* Groups
** TODO G2 <2021-10-21 jue 16:58> :H1: Uwe Brauer
:PROPERTIES:
:ID:       f617d937-2efa-46c8-bcff-0c3d0302f245
:EMAIL:    oub@mat.ucm.es
:Grp1:     Gr1
:Usuario1: Uwe Brauer
:email1:   oub@mat.ucm.es
:End:    

** TODO G1 <2021-10-21 jue 17:05> :G1:H1: Uwe Brauer
:PROPERTIES:
:ID:
:EMAIL:    oub@mat.ucm.es
:Grp1:     Gr3
:Usuario1: Uwe Brauer
:email1:   oub@mat.ucm.es
:Speaker:  Speaker
:Start:    Speaker
:END:

** TODO G1 <2021-10-21 jue 17:10> :H1:G1: Uwe Brauer
:PROPERTIES:
:ID:
:EMAIL:    oub@mat.ucm.es
:Grp1:     G1
:Usuario1: Uwe Brauer
:email1:   oub@mat.ucm.es
:Speaker:  Uwe
:Start:    Thu, 21 Oct 2021 16:48:35 +0200
:END:    



** tables
#+BEGIN: columnview :hlines 2 :exclude-tags  ("H2")    :skip-empty-rows t :indent nil :format  "%5TODO(Status) %5Id(Group) %5Ex(Exercise) %5Sheet(Sheet) %7ST1(Status){X/}"
| Status | Group | Exercise | Sheet | Status |
|--------+-------+----------+-------+--------|
|        |       |          |       | [2/3]  |
|--------+-------+----------+-------+--------|
| DONE   | G1    | E1       | H1    | [ ]    |
|--------+-------+----------+-------+--------|
| DONE   | G2    | E3       | H1    | [1/1]  |
#+END

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

* Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-23  6:42 [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)] Uwe Brauer
@ 2021-10-24 11:00 ` Kévin Le Gouguec
  2021-10-24 11:49   ` [PATCH] " Ihor Radchenko
  2021-10-24 14:48   ` Uwe Brauer
  0 siblings, 2 replies; 13+ messages in thread
From: Kévin Le Gouguec @ 2021-10-24 11:00 UTC (permalink / raw)
  To: Uwe Brauer; +Cc: emacs-orgmode, Ihor Radchenko

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

Uwe Brauer <oub@mat.ucm.es> writes:

> In the attached file 

Maybe I missed it, but I don't think your report included an attachment?
I went with the two example files you showed in the previous discussion;
cf. my own attachments.

>                      I do:
>
>     M-: (setq org-adapt-indentation 'headline-data)
>     C-x h
>     M-: (indent-for-tab-command)
>
> Result 
>
>  the :PROPERTIES: drawer is not indented.
>
> Emacs  : GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, X toolkit, cairo version 1.14.6, Xaw3d scroll bars)
>  of 2021-07-31
> Package: Org mode version 9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)

I can reproduce with the latest commit on 'main' (e2fa3c4c4); AFAICT the
release that is included in the emacs-28 branch (52e6f1) works
correctly, which is why I did not see the problem.

I tried to bisect; fc80d052d fails to compile so it's hard to be sure,
but I think it might be when things started to go awry.  I can't
reproduce the bug with the parent commit (6933c1ad7), but I can with the
next one (bc52c4d9a).

fc80d052d was a rather chunky commit so I did not dig into the patch;
Ihor, does it make sense to you that it might have introduced
unfortunate side-effects wrt :PROPERTIES: indentation?



[-- Attachment #2: uwe1.org --]
[-- Type: text/plain, Size: 281 bytes --]

** DONE G1                                                            :H1:G1:
:PROPERTIES:
:ID:       G1
:User1:    John
:email1:   john@gmail.com
:Start:    <2021-02-16 mar>
:End:      <2021-05-24 lun>
:STATUS:   [ ]
:ST1:      [ ]
:Sheet:    H1
:Ex:       E2
:Ex:       E1
:END:

[-- Attachment #3: uwe2.org --]
[-- Type: text/plain, Size: 180 bytes --]

* TODO G1 <2021-10-21 jue 17:10> :H1:G1: Uwe Brauer
:PROPERTIES:
:ID:       
:EMAIL: oub@mat.ucm.es
:Grp1:     G1
:Usuario1: Uwe Brauer
:email1: oub@mat.ucm.es
:Speaker: Uwe
:End:

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

* [PATCH] Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 11:00 ` Kévin Le Gouguec
@ 2021-10-24 11:49   ` Ihor Radchenko
  2021-10-24 12:56     ` Kévin Le Gouguec
  2021-10-24 14:48   ` Uwe Brauer
  1 sibling, 1 reply; 13+ messages in thread
From: Ihor Radchenko @ 2021-10-24 11:49 UTC (permalink / raw)
  To: Kévin Le Gouguec; +Cc: Uwe Brauer, emacs-orgmode

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

Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:

> fc80d052d was a rather chunky commit so I did not dig into the patch;
> Ihor, does it make sense to you that it might have introduced
> unfortunate side-effects wrt :PROPERTIES: indentation?

You are right.  org--get-expected-indentation have some expectations
about :parent property of provided ELEMENT.  After my commit, elements
can have sections as parents.  The tentative fix is attached, but please
double check because I am not very familiar with the indentation code.

Best,
Ihor


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-org-get-expected-indentation-Consider-section-parent.patch --]
[-- Type: text/x-diff, Size: 1984 bytes --]

From 5f4fd0880a47baa062adc669dd71b5c3bb917081 Mon Sep 17 00:00:00 2001
Message-Id: <5f4fd0880a47baa062adc669dd71b5c3bb917081.1635075984.git.yantar92@gmail.com>
From: Ihor Radchenko <yantar92@gmail.com>
Date: Sun, 24 Oct 2021 19:25:24 +0800
Subject: [PATCH] org--get-expected-indentation: Consider section parent type

* lisp/org.el (org--get-expected-indentation): Consider new :parent
structure when `org-element-at-point' returns parent section and
headline elements.

* testing/lisp/test-org.el (test-org/indent-region): Add test.

Fixes https://list.orgmode.org/87pmrupu0s.fsf@gmail.com/T/#t
---
 lisp/org.el              | 4 ++++
 testing/lisp/test-org.el | 7 +++++++
 2 files changed, 11 insertions(+)

diff --git a/lisp/org.el b/lisp/org.el
index 0a83c00fc..90804d26e 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -19218,6 +19218,10 @@ (defun org--get-expected-indentation (element contentsp)
       (contentsp
        (cl-case type
 	 ((diary-sexp footnote-definition) 0)
+         (section
+          (org--get-expected-indentation
+           (org-element-property :parent element)
+           t))
 	 ((headline inlinetask nil)
 	  (if (not org-adapt-indentation) 0
 	    (let ((level (org-current-level)))
diff --git a/testing/lisp/test-org.el b/testing/lisp/test-org.el
index 47a5f565f..5838b192d 100644
--- a/testing/lisp/test-org.el
+++ b/testing/lisp/test-org.el
@@ -1168,6 +1168,13 @@ (ert-deftest test-org/indent-region ()
 		  (org-adapt-indentation nil))
 	      (org-indent-region (point) (point-max)))
 	    (buffer-string))))
+  ;; Indent property drawers according to `org-adapt-indentation'.
+  (let ((org-adapt-indentation 'headline-data))
+    (should
+     (equal "* H\n  :PROPERTIES:\n  :key:\n  :END:"
+            (org-test-with-temp-text "* H\n:PROPERTIES:\n:key:\n:END:"
+              (org-indent-region (point-min) (point-max))
+              (buffer-string)))))
   ;; Indent plain lists.
   (let ((org-adapt-indentation t))
     (should
-- 
2.32.0


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

* Re: [PATCH] Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 11:49   ` [PATCH] " Ihor Radchenko
@ 2021-10-24 12:56     ` Kévin Le Gouguec
  2021-10-24 15:30       ` Uwe Brauer
  0 siblings, 1 reply; 13+ messages in thread
From: Kévin Le Gouguec @ 2021-10-24 12:56 UTC (permalink / raw)
  To: Ihor Radchenko; +Cc: Uwe Brauer, emacs-orgmode

Ihor Radchenko <yantar92@gmail.com> writes:

>                                The tentative fix is attached, but please
> double check because I am not very familiar with the indentation code.

I've applied your fix on top of 281a0e26b; AFAICT it works as expected.

Thanks for cooking up a test case!  'make check' succeeds over here, so
either this patch is The Right Thing, or we'll have an opportunity to
add more tests soon enough 😉


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

* Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 11:00 ` Kévin Le Gouguec
  2021-10-24 11:49   ` [PATCH] " Ihor Radchenko
@ 2021-10-24 14:48   ` Uwe Brauer
  2021-10-25 10:11     ` Eric S Fraga
  1 sibling, 1 reply; 13+ messages in thread
From: Uwe Brauer @ 2021-10-24 14:48 UTC (permalink / raw)
  To: Kévin Le Gouguec; +Cc: Uwe Brauer, emacs-orgmode, Ihor Radchenko

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

>>> "KLG" == Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:

> Uwe Brauer <oub@mat.ucm.es> writes:
>> In the attached file 

> Maybe I missed it, but I don't think your report included an attachment?
> I went with the two example files you showed in the previous discussion;
> cf. my own attachments.


I just checked. I did provide an attachment

It can be seen with any browser at 

https://lists.gnu.org/archive/html/emacs-orgmode/2021-10/msg00748.html

But I cannot see it with emacs and gnus! Another bug?

I will send a bug report to the gnus list


>> I do:
>> 
>> M-: (setq org-adapt-indentation 'headline-data)
>> C-x h
>> M-: (indent-for-tab-command)
>> 
>> Result 
>> 
>> the :PROPERTIES: drawer is not indented.
>> 
>> Emacs  : GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, X toolkit, cairo version 1.14.6, Xaw3d scroll bars)
>> of 2021-07-31
>> Package: Org mode version 9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)

> I can reproduce with the latest commit on 'main' (e2fa3c4c4); AFAICT the
> release that is included in the emacs-28 branch (52e6f1) works
> correctly, which is why I did not see the problem.

> I tried to bisect; fc80d052d fails to compile so it's hard to be sure,
> but I think it might be when things started to go awry.  I can't
> reproduce the bug with the parent commit (6933c1ad7), but I can with the
> next one (bc52c4d9a).

Ok I I have currently using d18beb7c6f9e99d25 because 
Ihor recommend me to use it because of another bug concerning
columnview.


Thanks for investigating this, I will try out now the patch that was
sent my Ihor a while ago

regards

[-- Attachment #2: smime.p7s --]
[-- Type: application/pkcs7-signature, Size: 5673 bytes --]

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

* Re: [PATCH] Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 12:56     ` Kévin Le Gouguec
@ 2021-10-24 15:30       ` Uwe Brauer
  2021-10-24 19:22         ` Kévin Le Gouguec
  2021-10-25 14:15         ` Ihor Radchenko
  0 siblings, 2 replies; 13+ messages in thread
From: Uwe Brauer @ 2021-10-24 15:30 UTC (permalink / raw)
  To: Kévin Le Gouguec; +Cc: Uwe Brauer, emacs-orgmode, Ihor Radchenko

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

>>> "KLG" == Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:

> Ihor Radchenko <yantar92@gmail.com> writes:
>> The tentative fix is attached, but please
>> double check because I am not very familiar with the indentation code.

> I've applied your fix on top of 281a0e26b; AFAICT it works as expected.

I applied the patch on top of e2fa3c4c4046b6, and it worked, Kevin, the two examples you sent uwe1.org and uwe2.org do not indent the drawer with org-indent-mode turned on, only with 


    M-: (setq org-adapt-indentation 'headline-data)
    C-x h
    M-: (indent-for-tab-command)

It indents. Can you confirm this?

Thanks 

[-- Attachment #2: smime.p7s --]
[-- Type: application/pkcs7-signature, Size: 5673 bytes --]

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

* Re: [PATCH] Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 15:30       ` Uwe Brauer
@ 2021-10-24 19:22         ` Kévin Le Gouguec
  2021-10-25  2:53           ` Ihor Radchenko
  2021-10-25  9:47           ` Uwe Brauer
  2021-10-25 14:15         ` Ihor Radchenko
  1 sibling, 2 replies; 13+ messages in thread
From: Kévin Le Gouguec @ 2021-10-24 19:22 UTC (permalink / raw)
  To: Uwe Brauer; +Cc: emacs-orgmode, Ihor Radchenko

Uwe Brauer <oub@mat.ucm.es> writes:

>>>> "KLG" == Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:
>
>> I've applied your fix on top of 281a0e26b; AFAICT it works as expected.
>
> I applied the patch on top of e2fa3c4c4046b6,

(Me too actually; 281a0e26b is the commit ID I got by applying Ihor's
patch; apologies for the confusion)

> the two examples you sent uwe1.org and uwe2.org do not indent the
> drawer with org-indent-mode turned on

Mmm, starting from emacs -Q and running M-x org-indent-mode, I see Org
indent the :PROPERTIES: drawers in both files, both with the tip of
Org's 'main' branch (e2fa3c4) and with Ihor's patch applied.


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

* Re: [PATCH] Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 19:22         ` Kévin Le Gouguec
@ 2021-10-25  2:53           ` Ihor Radchenko
  2021-10-25  9:47           ` Uwe Brauer
  1 sibling, 0 replies; 13+ messages in thread
From: Ihor Radchenko @ 2021-10-25  2:53 UTC (permalink / raw)
  To: Kévin Le Gouguec; +Cc: Uwe Brauer, emacs-orgmode

Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:

> Mmm, starting from emacs -Q and running M-x org-indent-mode, I see Org
> indent the :PROPERTIES: drawers in both files, both with the tip of
> Org's 'main' branch (e2fa3c4) and with Ihor's patch applied.

Same on my side. org-indent-mode works fine for me.

Best,
Ihor


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

* Re: [PATCH] Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 19:22         ` Kévin Le Gouguec
  2021-10-25  2:53           ` Ihor Radchenko
@ 2021-10-25  9:47           ` Uwe Brauer
  1 sibling, 0 replies; 13+ messages in thread
From: Uwe Brauer @ 2021-10-25  9:47 UTC (permalink / raw)
  To: Kévin Le Gouguec; +Cc: Uwe Brauer, emacs-orgmode, Ihor Radchenko

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

>>> "KLG" == Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:

> Uwe Brauer <oub@mat.ucm.es> writes:
>>>>> "KLG" == Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:
>> 
>>> I've applied your fix on top of 281a0e26b; AFAICT it works as expected.
>> 
>> I applied the patch on top of e2fa3c4c4046b6,

> (Me too actually; 281a0e26b is the commit ID I got by applying Ihor's
> patch; apologies for the confusion)

Aha, well when I did that I obtained 5a3bb0df92717 😎

[-- Attachment #2: smime.p7s --]
[-- Type: application/pkcs7-signature, Size: 5673 bytes --]

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

* Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 14:48   ` Uwe Brauer
@ 2021-10-25 10:11     ` Eric S Fraga
  2021-10-25 10:13       ` Uwe Brauer
  0 siblings, 1 reply; 13+ messages in thread
From: Eric S Fraga @ 2021-10-25 10:11 UTC (permalink / raw)
  To: Uwe Brauer; +Cc: emacs-orgmode

On Sunday, 24 Oct 2021 at 16:48, Uwe Brauer wrote:
> I just checked. I did provide an attachment
> But I cannot see it with emacs and gnus! Another bug?

I can see it in gnus.

-- 
: Eric S Fraga via Emacs 28.0.60, Org release_9.5-163-g4eab5b
: Latest paper written in org: https://arxiv.org/abs/2106.05096


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

* Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-25 10:11     ` Eric S Fraga
@ 2021-10-25 10:13       ` Uwe Brauer
  2021-10-25 11:16         ` Eric S Fraga
  0 siblings, 1 reply; 13+ messages in thread
From: Uwe Brauer @ 2021-10-25 10:13 UTC (permalink / raw)
  To: Org Mode List

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

>>> "ESF" == Eric S Fraga <e.fraga@ucl.ac.uk> writes:

> On Sunday, 24 Oct 2021 at 16:48, Uwe Brauer wrote:
>> I just checked. I did provide an attachment
>> But I cannot see it with emacs and gnus! Another bug?

> I can see it in gnus.

Do you see the attachment using gmane or the mailing list?

Lars told me is not going to check gmane, so it is important to know whether files that are attached to bug reports are displayed in gmane.

It seems that Kevin and I did not see the attachment

[-- Attachment #2: smime.p7s --]
[-- Type: application/pkcs7-signature, Size: 5673 bytes --]

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

* Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-25 10:13       ` Uwe Brauer
@ 2021-10-25 11:16         ` Eric S Fraga
  0 siblings, 0 replies; 13+ messages in thread
From: Eric S Fraga @ 2021-10-25 11:16 UTC (permalink / raw)
  To: Uwe Brauer; +Cc: Org Mode List

On Monday, 25 Oct 2021 at 12:13, Uwe Brauer wrote:
> Do you see the attachment using gmane or the mailing list?

via mailing list.

-- 
: Eric S Fraga via Emacs 28.0.60, Org release_9.5-163-g4eab5b
: Latest paper written in org: https://arxiv.org/abs/2106.05096


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

* Re: [PATCH] Re: [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)]
  2021-10-24 15:30       ` Uwe Brauer
  2021-10-24 19:22         ` Kévin Le Gouguec
@ 2021-10-25 14:15         ` Ihor Radchenko
  1 sibling, 0 replies; 13+ messages in thread
From: Ihor Radchenko @ 2021-10-25 14:15 UTC (permalink / raw)
  To: Uwe Brauer; +Cc: emacs-orgmode, Kévin Le Gouguec

Uwe Brauer <oub@mat.ucm.es> writes:

>>>> "KLG" == Kévin Le Gouguec <kevin.legouguec@gmail.com> writes:
>
>> Ihor Radchenko <yantar92@gmail.com> writes:
>>> The tentative fix is attached, but please
>>> double check because I am not very familiar with the indentation code.
>
>> I've applied your fix on top of 281a0e26b; AFAICT it works as expected.
>
> I applied the patch on top of e2fa3c4c4046b6, and it worked...

I applied the patch as 5f4fd0880 to main.

Best,
Ihor


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

end of thread, other threads:[~2021-10-25 14:15 UTC | newest]

Thread overview: 13+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2021-10-23  6:42 [BUG] indention of drawer does not work [9.5 (release_9.5-145-gd18beb @ /home/oub/emacs/site-lisp/packages/org/)] Uwe Brauer
2021-10-24 11:00 ` Kévin Le Gouguec
2021-10-24 11:49   ` [PATCH] " Ihor Radchenko
2021-10-24 12:56     ` Kévin Le Gouguec
2021-10-24 15:30       ` Uwe Brauer
2021-10-24 19:22         ` Kévin Le Gouguec
2021-10-25  2:53           ` Ihor Radchenko
2021-10-25  9:47           ` Uwe Brauer
2021-10-25 14:15         ` Ihor Radchenko
2021-10-24 14:48   ` Uwe Brauer
2021-10-25 10:11     ` Eric S Fraga
2021-10-25 10:13       ` Uwe Brauer
2021-10-25 11:16         ` Eric S Fraga

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

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

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