* Bug: LaTeX export does not handle .pgf/.tikz images [9.3 (9.3-elpaplus @ .emacs.d/elpa/org-plus-contrib-20191203/)]
@ 2019-12-06 6:47 Arthur
2019-12-07 11:25 ` Fraga, Eric
2019-12-07 11:32 ` Nicolas Goaziou
0 siblings, 2 replies; 3+ messages in thread
From: Arthur @ 2019-12-06 6:47 UTC (permalink / raw)
To: emacs-orgmode
[-- Attachment #1.1: Type: text/plain, Size: 1531 bytes --]
Remember to cover the basics, that is, what you expected to happen and
what in fact did happen. You don't know how to make a good report? See
https://orgmode.org/manual/Feedback.html#Feedback
Your bug report will be posted to the Org mailing list.
------------------------------------------------------------------------
Hi,
Since my last org update (today or yesterday I would say) I have been
having an issue with exporting .pgf or .tikz file to LaTeX. The
exporter always returns `nil`.
I attached a patch that can fix this. It is not thoroughly tested by my
assumption is that the `progn` does not actually "set" variable
`image-code`, hence the `nil`.
Attached:
- org file to reproduce the error.
- tex file output by the org exporter.
- output of `org-submit-bug-report` (it is waaay too long)
- the patch I wrote which basically removes the `progn` block and
replaces it by a single `setq`.
In summary, when you have [[file:test.pgf]] and export to LaTeX:
- Expected output:
\begin{center}
\input{test.pgf}
\end{center}
- Actual output:
\begin{center}
nil
\end{center
Summary of config:
- GNU Emacs 25.2.2 (x86_64-pc-linux-gnu, GTK+ Version 3.22.21) of
2017-09-23, modified by Debian
- Org mode version 9.3 (9.3-elpaplus @
.emacs.d/elpa/org-plus-contrib-20191203/)
My apologies if this comes from some weird thing in my config,
although I have checked with `emacs -Q -l <base-config>`. I have
tried with full file, subtree, custom and default LaTeX class.
Regards,
Arthur
[-- Attachment #1.2: Type: text/html, Size: 1848 bytes --]
[-- Attachment #2: ox-latex.patch --]
[-- Type: text/x-patch, Size: 1915 bytes --]
--- org-plus-contrib-20191203/ox-latex.el 2019-12-06 17:28:34.258945803 +1100
+++ org-plus-contrib-20191203/ox-latex.el 2019-12-06 17:28:53.765352128 +1100
@@ -2411,21 +2411,22 @@
;; - if options are present, wrap in a tikzpicture environment.
;; - if width or height are present, use \resizebox to change
;; the image size.
- (progn
- (setq image-code (format "\\input{%s}" path))
- (when (org-string-nw-p options)
- (setq image-code
- (format "\\begin{tikzpicture}[%s]\n%s\n\\end{tikzpicture}"
- options
- image-code)))
- (setq image-code
- (cond ((org-string-nw-p scale)
- (format "\\scalebox{%s}{%s}" scale image-code))
- ((or (org-string-nw-p width) (org-string-nw-p height))
- (format "\\resizebox{%s}{%s}{%s}"
- (if (org-string-nw-p width) width "!")
- (if (org-string-nw-p height) height "!")
- image-code)))))
+ (setq image-code
+ (let* ((image-base (format "\\input{%s}" path))
+ (image-input
+ (if (org-string-nw-p options)
+ (format "\\begin{tikzpicture}[%s]\n%s\n\\end{tikzpicture}"
+ options
+ image-base)
+ image-base)))
+ (cond ((org-string-nw-p scale)
+ (format "\\scalebox{%s}{%s}" scale image-input))
+ ((or (org-string-nw-p width) (org-string-nw-p height))
+ (format "\\resizebox{%s}{%s}{%s}"
+ (if (org-string-nw-p width) width "!")
+ (if (org-string-nw-p height) height "!")
+ image-input))
+ (t image-base))))
;; For other images:
;; - add scale, or width and height to options.
;; - include the image with \includegraphics.
[-- Attachment #3: test.tex --]
[-- Type: text/x-tex, Size: 741 bytes --]
% Created 2019-12-06 Fri 17:41
% Intended LaTeX compiler: pdflatex
\documentclass{article}
\usepackage[utf8]{inputenc}
\usepackage[T1]{fontenc}
\usepackage{graphicx}
\usepackage{grffile}
\usepackage{longtable}
\usepackage{wrapfig}
\usepackage{rotating}
\usepackage[normalem]{ulem}
\usepackage{amsmath}
\usepackage{textcomp}
\usepackage{amssymb}
\usepackage{capt-of}
\usepackage{hyperref}
\author{soha}
\date{\today}
\title{}
\hypersetup{
pdfauthor={soha},
pdftitle={},
pdfkeywords={},
pdfsubject={},
pdfcreator={Emacs 25.2.2 (Org mode 9.3)},
pdflang={English}}
\begin{document}
\tableofcontents
\section{Bug: \LaTeX{} export does not handle .pgf/.tikz images}
\label{sec:org5faca5a}
\begin{center}
nil
\end{center}
\end{document}
[-- Attachment #4: test.org --]
[-- Type: application/octet-stream, Size: 353 bytes --]
#+latex_class: article
#+latex_class_options:
#+latex_header:
#+latex_header_extra:
#+description:
#+keywords:
#+subtitle:
#+latex_compiler: pdflatex
#+date: \today
* Bug: LaTeX export does not handle .pgf/.tikz images
[[file:test.pgf]]
# Expected:
# \begin{center}
# \input{test.pgf}
# \end{center}
#
# Actual:
# \begin{center}
# nil
# \end{center}
[-- Attachment #5: org-submit-bug-report.out --]
[-- Type: application/octet-stream, Size: 172013 bytes --]
Emacs : GNU Emacs 25.2.2 (x86_64-pc-linux-gnu, GTK+ Version 3.22.21)
of 2017-09-23, modified by Debian
Package: Org mode version 9.3 (9.3-elpaplus @ /home/student/.emacs.d/elpa/org-plus-contrib-20191203/)
current state:
==============
(setq
org-src-lang-modes '(("arduino" . arduino) ("redis" . redis) ("php" . php)
("C" . c) ("C++" . c++) ("asymptote" . asy)
("bash" . sh) ("beamer" . latex) ("calc" . fundamental)
("cpp" . c++) ("ditaa" . artist) ("dot" . fundamental)
("elisp" . emacs-lisp) ("ocaml" . tuareg)
("screen" . shell-script) ("shell" . sh)
("sqlite" . sql))
org-latex-tables-booktabs t
org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
org-footnote-auto-adjust t
org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-adapt-indentation nil
org-latex-classes '(("infor"
"\\documentclass[]{interact}\n\\usepackage[utf8]{inputenc}\n\n\\usepackage{epstopdf}% To incorporate .eps illustrations using PDFLaTeX, etc.\n\\usepackage[caption=false]{subfig}% Support for small, `sub' figures and tables\n%\\usepackage[nolists,tablesfirst]{endfloat}% To `separate' figures and tables from text if required\n\n%\\usepackage[doublespacing]{setspace}% To produce a `double spaced' document if required\n%\\setlength\\parindent{24pt}% To increase paragraph indentation when line spacing is doubled\n%\\setlength\\bibindent{2em}% To increase hanging indent in bibliography when line spacing is doubled\n\n\\usepackage{natbib}% Citation support using natbib.sty\n\\bibpunct[, ]{(}{)}{;}{a}{}{,}% Citation support using natbib.sty\n\\renewcommand\\bibfont{\\fontsize{10}{12}\\selectfont}% Bibliography support using natbib.sty\n\n\\theoremstyle{plain}% Theorem-like structures provided by amsthm.sty\n\\newtheorem{theorem}{Theorem}[section]\n\\newtheorem{lemma}[theorem]{Lemma}\n\\newtheorem{corollary}[theorem]{Corollary}\n\\newtheorem{proposition}[theorem]{Proposition}\n\n\\theoremstyle{definition}\n\\newtheorem{definition}[theorem]{Definition}\n\\newtheorem{example}[theorem]{Example}\n\n\\theoremstyle{remark}\n\\newtheorem{remark}{Remark}\n\\newtheorem{notation}{Notation}\n\n[NO-DEFAULT-PACKAGES]\n[EXTRA]\n\\usepackage{hyperref}\n\\usepackage{cleveref}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("tufte"
"\\documentclass[a4paper, nobib]{tufte-handout}\n\\usepackage[style=apa]{biblatex}\n\\renewcommand{\\cite}[2][0pt]{\\unskip \\sidenote{\\fullcite{#2}}}\n\\usepackage{realscripts}\n% \\usepackage{unicode-math}\n% \\setmathfont[Scale=MatchUppercase]{libertinusmath-regular.otf}\n\\setmonofont[Scale=MatchLowercase]{DejaVu Sans Mono}\n\\setmainfont[\n Ligatures=TeX,\n Numbers={OldStyle, Proportional},\n SmallCapsFeatures = {LetterSpace = 5, Renderer = Basic}\n % Ligatures={NoCommon, NoRequired, NoContextual}}\n]{Linux Libertine O}\n\\usepackage[multiple]{fnpct}\n\\setfnpct{add-punct-marks=;:}\n\\AdaptNote\\sidenote\\multsidenote\n[NO-DEFAULT-PACKAGES]\n[EXTRA]\n\\usepackage{cleveref}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("paper"
"\\documentclass[a4paper, 11pt, svgnames]{article}\n[DEFAULT-PACKAGES]\n\\newlength{\\alphabet}\n\\settowidth{\\alphabet}{\\normalfont abcdefghijklmnopqrstuvwxyz}\n\\usepackage[textwidth=2.3\\alphabet]{geometry}\n\\usepackage{amssymb}\n\\usepackage{mathtools}\n\\usepackage{xspace}\n\\usepackage[svgnames]{xcolor}\n\\usepackage{booktabs}\n\\usepackage{multirow}\n\\usepackage{pgfplots} % External TikZ/PGF support (thanks to Andreas Nautsch)\n\\usetikzlibrary{calc,positioning,shapes,arrows,positioning,fit,backgrounds}\n\\usepgfplotslibrary{fillbetween}\n\\usepackage{fontspec}\n\\usepackage{unicode-math}\n\\setmainfont[\n Ligatures=TeX,\n Numbers={OldStyle, Proportional},\n SmallCapsFeatures = {LetterSpace = 5, Renderer = Basic}\n % Ligatures={NoCommon, NoRequired, NoContextual}}\n]{Linux Libertine O}\n\\newfontfamily\\headerfont[\n LetterSpace=5,\n WordSpace=1.5,\n Ligatures=NoCommon,\n Numbers={OldStyle, Proportional},\n Kerning=Uppercase,\n Letters=SmallCaps,\n Numbers={OldStyle, Proportional}\n]{Linux Libertine O}\n\\newfontfamily\\acrofont[\n LetterSpace=5,\n WordSpace=1.5,\n Ligatures=NoCommon,\n Kerning=Uppercase,\n Letters={SmallCaps, UppercaseSmallCaps},\n Numbers={OldStyle, Proportional}\n]{Linux Libertine O}\n\\setmathfont[Scale=MatchUppercase]{libertinusmath-regular.otf}\n\\setmonofont[Scale=MatchLowercase]{DejaVu Sans Mono}\n\\usepackage{etoolbox}\n\\setlength{\\baselineskip}{13pt}\n\\renewcommand{\\arraystretch}{1.2}\n\\newcommand\\lining{\\addfontfeatures{Numbers={Proportional, Lining}}}\n\\newcommand\\fixed{\\addfontfeatures{Numbers={Monospaced, Lining}}}\n\\AtBeginEnvironment{tabular}{\\fixed}\n\\renewcommand{\\theequation}{{\\lining\\arabic{equation}}}\n\\frenchspacing\n\\usepackage{titlesec}\n\\newcommand{\\flatcaps}[1]{{\\headerfont \\MakeLowercase{#1}}}\n\\titleformat{\\section}{\\large\\bfseries}{\\lining\\thesection}{1em}{}\n\\titleformat{\\subsection}{\\large}{\\thesubsection}{.6em}{\\flatcaps}\n\\titleformat{\\subsubsection}{}{\\thesubsubsection}{.6em}{\\itshape}\n\\titleformat{\\paragraph}[runin]{\\headerfont}{\\theparagraph}{0pt}{}[.]\n\\titlespacing*{\\section}{0pt}{2\\baselineskip}{1\\baselineskip}\n\\titlespacing*{\\subsection}{0pt}{1\\baselineskip}{1\\baselineskip}\n\\titlespacing*{\\subsubsection}{0pt}{8pt}{5pt}\n\\usepackage[tracking]{microtype}\n\\usepackage{enumitem}\n\\setlist{noitemsep, nosep, leftmargin=\\parindent}\n\\setlist[1]{labelindent=\\parindent} % < Usually a good idea\n\\setlist[description]{font=\\mdseries\\flatcaps, labelindent=0pt} % Have to remove the bold\n\\usepackage{caption}\n\\usepackage{subcaption}\n\\DeclareCaptionLabelFormat{lc}{\\flatcaps{#1}~{#2}}\n\\captionsetup{font=small, format=plain, labelformat=lc, width=.9\\textwidth}\n\\captionsetup[subfigure]{labelsep=colon, labelfont=sc, labelformat=simple}\n\\usepackage[\n normal-marks,\n normal-mark-width=\\parindent,\n % normal-indent=0em,\n % normal-par-indent=\\parindent\n]{fnpct}\n\\setfnpct{add-punct-marks=;:}\n\\usepackage{realscripts}\n\\usepackage{selnolig}\n\\usepackage[runin]{abstract}\n\\renewcommand{\\abstractnamefont}{\\normalfont\\flatcaps}\n\\abslabeldelim{\\newline}\n\\setlength{\\abstitleskip}{-\\parindent}\n\\usepackage[\n natbib=true,\n style=authoryear,\n % citestyle=numeric-comp,\n autocite=inline,\n maxbibnames=100,\n mincitenames=1,\n maxcitenames=2,\n hyperref=true,\n % uniquelist=false,\n % uniquename=init,\n giveninits=true,\n dashed=false,\n useprefix=true,\n date=year,\n isbn=false, eprint=true, url=false, % Do not print extra info\n]{biblatex}\n% \\renewcommand*{\\citesetup}{%\n% \\lining\n% \\biburlsetup\n% \\frenchspacing}\n%% Period inside the quotes, please.\n\\uspunctuation\n\\DeclareNameAlias{sortname}{family-given}\n\\renewcommand{\\finentrypunct}{} % Remove period at end of reference\n\\AtBeginBibliography{\\sloppy}\n%% Acronyms\n\\usepackage[printonlyused, smaller]{acronym}\n% \\newcommand\\acrofont\n\\renewcommand*{\\acsfont}[1]{{\\acrofont #1}}\n\\renewcommand*{\\aclabelfont}[1]{{\\acrofont #1}}\n[PACKAGES]\n[EXTRA]\n% Cleveref needs to be last\n\\usepackage{cleveref}\n\\hypersetup{pdftex, breaklinks, colorlinks, urlcolor=FireBrick, linkcolor=NavyBlue, citecolor=ForestGreen}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("svmult"
"\\documentclass[11pt]{svmult}\n\\usepackage[utf8]{inputenc}\n\\usepackage[T1]{fontenc}\n\\usepackage{fixltx2e}\n\\usepackage{longtable}\n\\usepackage{float}\n\\usepackage{wrapfig}\n\\usepackage{rotating}\n\\usepackage[normalem]{ulem}\n\\usepackage{amsmath}\n\\usepackage{textcomp}\n\\usepackage{marvosym}\n\\usepackage{wasysym}\n\\usepackage{amssymb}\n\\usepackage{hyperref}\n\\usepackage{mathptmx}\n\\usepackage{helvet}\n\\usepackage{courier}\n\\usepackage{type1cm}\n\\usepackage{makeidx}\n\\usepackage{graphicx}\n\\usepackage{multicol}\n\\usepackage[bottom]{footmisc}\n\\providecommand{\\e}[1]{\\ensuremath{\\times 10^{#1}}}\n[NO-DEFAULT-PACKAGES] [PACKAGES] [EXTRA]"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("thesis"
"\\documentclass[headinclude, footinclude, cleardoublepage=empty,\n paper=a4, fontsize=11pt, svgnames % Fix xcolor errors\n]{scrreprt}\n\n\\input{classicthesis-config}\n\\input{macros}\n\\input{tikz}\n\\setcounter{secnumdepth}{2} % <-- 2 numbers up to subsections\n[NO-DEFAULT-PACKAGES]\n[EXTRA]"
("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("thesis-full"
"\\documentclass[twoside, openright, titlepage, numbers=noenddot, %1headlines,\n headinclude, footinclude, cleardoublepage=empty, abstract=on,\n BCOR=5mm, paper=a4, fontsize=11pt,\n svgnames % Fix xcolor errors\n]{scrreprt}\n\n\\input{classicthesis-config}\n\\input{macros}\n\\input{tikz}\n[NO-DEFAULT-PACKAGES]"
("\\part{%s}" . "\\part*{%s}")
("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%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}"))
)
org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
(insert
(format "cite:%s\n"
(org-entry-get (point) "Custom_ID"))
)
)
)
org-occur-hook '(org-first-headline-recenter)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-html-format-drawer-function '(closure
(htmlize-buffer-places
org-html-format-table-no-css
htmlize-css-name-prefix
htmlize-output-type htmlize-output-type
htmlize-css-name-prefix t)
(_name contents) contents)
org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
org-confirm-shell-link-function 'yes-or-no-p
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-ref-open-pdf-function 'org-ref-open-pdf-at-point
org-ref-cite-onclick-function 'org-ref-cite-click-helm
org-latex-pdf-process '("latexmk -gg -shell-escape -interaction=nonstopmode -lualatex %f")
org-ref-insert-label-function 'org-ref-helm-insert-label-link
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-latex-image-default-width ""
org-latex-format-drawer-function '(closure (t) (_ contents) contents)
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-ref-pdf-to-bibtex-function 'copy-file
org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-babel-pre-tangle-hook '(save-buffer)
org-mode-hook '(org-ref-org-menu
(closure
(org--rds reftex-docstruct-symbol
org-element-greater-elements org-clock-history
org-agenda-current-date org-with-time org-defdecode org-def
org-read-date-inactive org-ans2 org-ans1
org-columns-current-fmt-compiled org-clock-current-task
org-clock-effort org-agenda-skip-function
org-agenda-skip-comment-trees org-agenda-archives-mode
org-end-time-was-given org-time-was-given
org-log-note-extra org-log-note-purpose
org-log-post-message org-last-inserted-timestamp
org-last-changed-timestamp
org-entry-property-inherited-from org-blocked-by-checkboxes
org-state org-agenda-headline-snapshot-before-repeat
org-capture-last-stored-marker org-agenda-start-on-weekday
org-agenda-buffer-tmp-name org-priority-regexp
buffer-face-mode-face org-tbl-menu org-org-menu
org-struct-menu org-entities org-last-state
org-id-track-globally org-clock-start-time texmathp-why
remember-data-file
org-agenda-tags-todo-honor-ignore-options
iswitchb-temp-buflist calc-embedded-open-mode
calc-embedded-open-formula calc-embedded-close-formula
align-mode-rules-list org-emphasis-alist
org-emphasis-regexp-components
org-export-registered-backends org-modules
org-babel-load-languages org-indent-indentation-per-level
org-element-paragraph-separate ffap-url-regexp
org-inlinetask-min-level t)
nil
(add-hook (quote change-major-mode-hook)
(quote org-show-all) (quote append) (quote local))
)
(closure
(org-src-window-setup *this*
org-babel-confirm-evaluate-answer-no
org-src-preserve-indentation org-src-lang-modes
org-edit-src-content-indentation org-babel-library-of-babel
t)
nil
(add-hook (quote change-major-mode-hook)
(quote org-babel-show-result-all) (quote append)
(quote local))
)
org-babel-result-hide-spec org-babel-hide-all-hashes
org-eldoc-load org-ref-setup-label-finders)
org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
org-latex-prefer-user-labels t
org-bibtex-headline-format-function '(closure
(org-id-locations
org-agenda-search-view-always-boolean
org-agenda-overriding-header t)
(entry) (cdr (assq :title entry)))
org-latex-caption-above nil
org-archive-hook '(org-attach-archive-delete-maybe)
org-ascii-format-drawer-function '(closure (t) (_name contents _width)
contents)
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
org-link-shell-confirm-function 'yes-or-no-p
org-export-async-init-file "~/.emacs.d/tools/async.el"
org-ref-clean-bibtex-key-function '(lambda (key)
(replace-regexp-in-string ":" "" key))
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-link-elisp-confirm-function 'yes-or-no-p
org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el")
("elisp" . "el"))
org-confirm-elisp-link-function 'yes-or-no-p
org-export-in-background t
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-odt-format-drawer-function '(closure
(hfy-user-sheet-assoc hfy-html-quote-regex
hfy-html-quote-map hfy-face-to-css
hfy-begin-span-handler hfy-end-span-handler
archive-zip-extract
nxml-auto-insert-xml-declaration-flag t)
(_name contents) contents)
org-ref-open-notes-function '(lambda nil (org-show-entry)
(outline-show-branches) (outline-show-children)
(org-cycle (quote (64)))
(recenter-top-bottom 0))
org-html-format-headline-function 'org-html-format-headline-default-function
org-link-parameters '(("attachment" :follow org-attach-open-link :export
org-attach-export-link :complete
org-attach-complete-link)
("id" :follow org-id-open)
("eww" :follow eww :store org-eww-store-link)
("rmail" :follow org-rmail-open :store
org-rmail-store-link)
("mhe" :follow org-mhe-open :store org-mhe-store-link)
("irc" :follow org-irc-visit :store org-irc-store-link
:export org-irc-export)
("info" :follow org-info-open :export org-info-export
:store org-info-store-link)
("gnus" :follow org-gnus-open :store
org-gnus-store-link)
("docview" :follow org-docview-open :export
org-docview-export :store org-docview-store-link)
("bbdb" :follow org-bbdb-open :export org-bbdb-export
:complete org-bbdb-complete-link :store
org-bbdb-store-link)
("w3m" :store org-w3m-store-link)
("printindex" :follow org-ref-index :export
(lambda (path desc format)
(cond
((eq format (quote latex)) (format "\\printindex")))
)
)
("index" :follow (lambda (path) (occur path)) :export
(lambda (path desc format)
(cond
((eq format (quote latex))
(format "\\index{%s}" path))
)
)
)
("bibentry" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-bibentry :complete
org-bibentry-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Autocites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Autocites :complete
org-Autocites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("autocites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-autocites :complete
org-autocites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("supercites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-supercites :complete
org-supercites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Textcites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Textcites :complete
org-Textcites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("textcites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-textcites :complete
org-textcites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Smartcites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Smartcites :complete
org-Smartcites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("smartcites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-smartcites :complete
org-smartcites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("footcitetexts" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-footcitetexts :complete
org-footcitetexts-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("footcites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-footcites :complete
org-footcites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Parencites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Parencites :complete
org-Parencites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("parencites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-parencites :complete
org-parencites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Cites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Cites :complete
org-Cites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("cites" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-cites :complete
org-cites-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("fnotecite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-fnotecite :complete
org-fnotecite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Pnotecite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Pnotecite :complete
org-Pnotecite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("pnotecite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-pnotecite :complete
org-pnotecite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Notecite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Notecite :complete
org-Notecite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("notecite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-notecite :complete
org-notecite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("footfullcite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-footfullcite :complete
org-footfullcite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("fullcite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-fullcite :complete
org-fullcite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citeurl" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citeurl :complete
org-citeurl-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citedate*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citedate* :complete
org-citedate*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citedate" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citedate :complete
org-citedate-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citetitle*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citetitle* :complete
org-citetitle*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citetitle" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citetitle :complete
org-citetitle-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Citeauthor*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Citeauthor* :complete
org-Citeauthor*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Autocite*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Autocite* :complete
org-Autocite*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("autocite*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-autocite* :complete
org-autocite*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Autocite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Autocite :complete
org-Autocite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("autocite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-autocite :complete
org-autocite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("supercite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-supercite :complete
org-supercite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("parencite*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-parencite* :complete
org-parencite*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("cite*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-cite* :complete
org-cite*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Smartcite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Smartcite :complete
org-Smartcite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("smartcite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-smartcite :complete
org-smartcite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Textcite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Textcite :complete
org-Textcite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("textcite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-textcite :complete
org-textcite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("footcitetext" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-footcitetext :complete
org-footcitetext-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("footcite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-footcite :complete
org-footcite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Parencite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Parencite :complete
org-Parencite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("parencite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-parencite :complete
org-parencite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Cite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Cite :complete
org-Cite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Citeauthor" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Citeauthor :complete
org-Citeauthor-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Citealp" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Citealp :complete
org-Citealp-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Citealt" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Citealt :complete
org-Citealt-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Citep" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Citep :complete
org-Citep-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("Citet" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-Citet :complete
org-Citet-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citeyearpar" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citeyearpar :complete
org-citeyearpar-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citeyear*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citeyear* :complete
org-citeyear*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citeyear" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citeyear :complete
org-citeyear-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citeauthor*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citeauthor* :complete
org-citeauthor*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citeauthor" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citeauthor :complete
org-citeauthor-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citetext" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citetext :complete
org-citetext-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citenum" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citenum :complete
org-citenum-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citealp*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citealp* :complete
org-citealp*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citealp" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citealp :complete
org-citealp-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citealt*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citealt* :complete
org-citealt*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citealt" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citealt :complete
org-citealt-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citep*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citep* :complete
org-citep*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citep" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citep :complete
org-citep-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citet*" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citet* :complete
org-citet*-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("citet" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-citet :complete
org-citet-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("nocite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-nocite :complete
org-nocite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
)
("cite" :follow
(lambda (_)
(funcall org-ref-cite-onclick-function nil))
:export org-ref-format-cite :complete
org-cite-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s
(org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor))
)
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string))
)
)
)
)
:face org-ref-cite-link-face-fn :display full :keymap
(keymap
(tab lambda nil (interactive)
(funcall org-ref-insert-cite-function))
(S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key)
(C-left . org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in the killring is a key."
(interactive)
(org-ref-insert-key-at-point (car kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new
(org-element-property :path (org-element-context)))
)
(16777335 lambda nil (interactive)
(kill-new (car (org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new (org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive) (org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body)
(follow-link . mouse-face)
(mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse))
:store org-ref-bibtex-store-link)
("Cref" :follow org-ref-ref-follow :export
org-ref-Cref-export :complete org-ref-complete-link
:face org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("cref" :follow org-ref-ref-follow :export
org-ref-cref-export :complete org-ref-complete-link
:face org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("autoref" :follow org-ref-ref-follow :export
org-ref-autoref-export :complete org-ref-complete-link
:face org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("eqref" :follow org-ref-ref-follow :export
org-ref-eqref-export :complete org-ref-complete-link
:face org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("nameref" :follow org-ref-ref-follow :export
org-ref-export-nameref :complete org-ref-complete-link
:face org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("pageref" :follow org-ref-ref-follow :export
(lambda (path desc format)
(cond
((eq format (quote html))
(format "(<pageref>%s</pageref>)" path))
((eq format (quote latex))
(format "\\pageref{%s}" path))
)
)
:face org-ref-ref-face-fn :complete
org-pageref-complete-link :help-echo
org-ref-ref-help-echo)
("ref" :follow org-ref-ref-follow :export
org-ref-ref-export :complete org-ref-complete-link
:face org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("label" :follow
(lambda (label)
"On clicking count the number of label tags used in the buffer.\nA number greater than one means multiple labels!"
(let
((count
(org-ref-count-labels label)
)
)
(message
(format
"%s occurence%s"
count
(if
(or
(= count 0)
(> count 1)
)
"s" "")
)
(org-ref-count-labels label)
)
)
)
:export
(lambda (keyword desc format)
(cond
((eq format (quote html))
(format "<div id=\"%s\"></div>" keyword))
((eq format (quote md))
(format "<a name=\"%s\"></a>" keyword))
((eq format (quote latex))
(format "\\label{%s}" keyword))
)
)
:store org-label-store-link :face
org-ref-label-face-fn :help-echo
(lambda (window object position)
(save-excursion (goto-char position)
(let ((s (org-ref-link-message)))
(let
((temp-buffer (generate-new-buffer " *temp*")))
(save-current-buffer (set-buffer temp-buffer)
(unwind-protect
(progn (insert s) (fill-paragraph)
(buffer-string))
(and (buffer-name temp-buffer)
(kill-buffer temp-buffer))
)
)
)
)
)
)
)
("list-of-tables" :follow org-ref-list-of-tables
:export
(lambda (keyword desc format)
(cond
((eq format (quote latex)) (format "\\listoftables"))
)
)
)
("list-of-figures" :follow org-ref-list-of-figures
:export
(lambda (keyword desc format)
(cond
((eq format (quote latex))
(format "\\listoffigures"))
)
)
)
("addbibresource" :follow org-ref-follow-addbibresource
:export
(lambda (keyword desc format)
(cond ((eq format (quote html)) (format ""))
((eq format (quote latex))
(format "\\addbibresource{%s}" keyword))
)
)
)
("bibliographystyle" :export
(lambda (keyword desc format)
(cond
((or (eq format (quote latex))
(eq format (quote beamer)))
(format "\\bibliographystyle{%s}" keyword))
(t ""))
)
)
("printbibliography" :follow org-ref-open-bibliography
:export
(lambda (keyword desc format)
(cond
((eq format (quote org))
(org-ref-get-org-bibliography))
((eq format (quote html))
(org-ref-get-html-bibliography))
((eq format (quote latex))
org-ref-printbibliography-cmd)
)
)
)
("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
(lambda (window object position)
(save-excursion (goto-char position)
(let ((s (org-ref-link-message)))
(let
((temp-buffer (generate-new-buffer " *temp*")))
(save-current-buffer (set-buffer temp-buffer)
(unwind-protect
(progn (insert s) (fill-paragraph)
(buffer-string))
(and (buffer-name temp-buffer)
(kill-buffer temp-buffer))
)
)
)
)
)
)
:face org-ref-bibliography-face-fn)
("Acp" :follow or-follow-acronym :face
org-ref-acronym-face :help-echo or-acronym-tooltip
:export
(closure
((mapping "Acp" . "Glspl") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" (cdr mapping) path))
(t (format "%s" (upcase path))))
)
)
("acp" :follow or-follow-acronym :face
org-ref-acronym-face :help-echo or-acronym-tooltip
:export
(closure
((mapping "acp" . "glspl") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" (cdr mapping) path))
(t (format "%s" (upcase path))))
)
)
("Ac" :follow or-follow-acronym :face
org-ref-acronym-face :help-echo or-acronym-tooltip
:export
(closure ((mapping "Ac" . "Gls") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" (cdr mapping) path))
(t (format "%s" (upcase path))))
)
)
("ac" :follow or-follow-acronym :face
org-ref-acronym-face :help-echo or-acronym-tooltip
:export
(closure ((mapping "ac" . "gls") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" (cdr mapping) path))
(t (format "%s" (upcase path))))
)
)
("acrfull" :follow or-follow-acronym :face
org-ref-acronym-face :help-echo or-acronym-tooltip
:export
(closure
((mapping "acrfull" . "acrfull") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" (cdr mapping) path))
(t (format "%s" (upcase path))))
)
)
("acrlong" :follow or-follow-acronym :face
org-ref-acronym-face :help-echo or-acronym-tooltip
:export
(closure
((mapping "acrlong" . "acrlong") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" (cdr mapping) path))
(t (format "%s" (upcase path))))
)
)
("acrshort" :follow or-follow-acronym :face
org-ref-acronym-face :help-echo or-acronym-tooltip
:export
(closure
((mapping "acrshort" . "acrshort") (--dolist-tail--)
t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" (cdr mapping) path))
(t (format "%s" (upcase path))))
)
)
("glslink" :follow or-follow-glossary :face
org-ref-glossary-face :help-echo or-glossary-tooltip
:export
(closure (t) (path desc format)
(cond
((eq format (quote latex))
(format "\\glslink{%s}{%s}" path desc))
(t (format "%s" path)))
)
)
("glsdesc" :follow or-follow-glossary :face
org-ref-glossary-face :help-echo or-glossary-tooltip
:export
(closure ((command . "glsdesc") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" command path))
(t (format "%s" path)))
)
)
("glssymbol" :follow or-follow-glossary :face
org-ref-glossary-face :help-echo or-glossary-tooltip
:export
(closure ((command . "glssymbol") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" command path))
(t (format "%s" path)))
)
)
("Glspl" :follow or-follow-glossary :face
org-ref-glossary-face :help-echo or-glossary-tooltip
:export
(closure ((command . "Glspl") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" command path))
(t (format "%s" path)))
)
)
("Gls" :follow or-follow-glossary :face
org-ref-glossary-face :help-echo or-glossary-tooltip
:export
(closure ((command . "Gls") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" command path))
(t (format "%s" path)))
)
)
("glspl" :follow or-follow-glossary :face
org-ref-glossary-face :help-echo or-glossary-tooltip
:export
(closure ((command . "glspl") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" command path))
(t (format "%s" path)))
)
)
("gls" :follow or-follow-glossary :face
org-ref-glossary-face :help-echo or-glossary-tooltip
:export
(closure ((command . "gls") (--dolist-tail--) t)
(path _ format)
(cond
((eq format (quote latex))
(format "\\%s{%s}" command path))
(t (format "%s" path)))
)
)
("bibtex" :follow org-bibtex-open :store
org-bibtex-store-link)
("file+sys") ("file+emacs")
("shell" :follow org-link--open-shell)
("news" :follow
(closure
((scheme . "news") (--dolist-tail--) org-ts-regexp
org-time-stamp-formats org-src-source-file-name
org-outline-regexp-bol org-inhibit-startup
org-id-link-to-org-use-id org-highlight-links
org-comment-string org-agenda-buffer-name
clean-buffer-list-kill-buffer-names t)
(url) (browse-url (concat scheme ":" url)))
)
("mailto" :follow
(closure
((scheme . "mailto") (--dolist-tail--) org-ts-regexp
org-time-stamp-formats org-src-source-file-name
org-outline-regexp-bol org-inhibit-startup
org-id-link-to-org-use-id org-highlight-links
org-comment-string org-agenda-buffer-name
clean-buffer-list-kill-buffer-names t)
(url) (browse-url (concat scheme ":" url)))
)
("https" :follow
(closure
((scheme . "https") (--dolist-tail--) org-ts-regexp
org-time-stamp-formats org-src-source-file-name
org-outline-regexp-bol org-inhibit-startup
org-id-link-to-org-use-id org-highlight-links
org-comment-string org-agenda-buffer-name
clean-buffer-list-kill-buffer-names t)
(url) (browse-url (concat scheme ":" url)))
)
("http" :follow
(closure
((scheme . "http") (--dolist-tail--) org-ts-regexp
org-time-stamp-formats org-src-source-file-name
org-outline-regexp-bol org-inhibit-startup
org-id-link-to-org-use-id org-highlight-links
org-comment-string org-agenda-buffer-name
clean-buffer-list-kill-buffer-names t)
(url) (browse-url (concat scheme ":" url)))
)
("ftp" :follow
(closure
((scheme . "ftp") (--dolist-tail--) org-ts-regexp
org-time-stamp-formats org-src-source-file-name
org-outline-regexp-bol org-inhibit-startup
org-id-link-to-org-use-id org-highlight-links
org-comment-string org-agenda-buffer-name
clean-buffer-list-kill-buffer-names t)
(url) (browse-url (concat scheme ":" url)))
)
("help" :follow org-link--open-help)
("file" :complete org-link-complete-file)
("elisp" :follow org-link--open-elisp)
("doi" :follow doi-link-menu :export
(lambda (doi desc format)
(cond
((eq format (quote html))
(format "<a href=\"%s%s\">%s</a>"
doi-utils-dx-doi-org-url doi
(or desc (concat "doi:" doi)))
)
((eq format (quote latex))
(format "\\href{%s%s}{%s}" doi-utils-dx-doi-org-url
doi (or desc (concat "doi:" doi)))
)
)
)
)
)
org-structure-template-alist '(("n" . "notes") ("a" . "export ascii")
("c" . "center") ("C" . "comment")
("e" . "example") ("E" . "export")
("h" . "export html") ("l" . "export latex")
("q" . "quote") ("s" . "src") ("v" . "verse"))
org-babel-load-languages '((emacs-lisp . t) (python . t))
org-ref-insert-link-function 'org-ref-helm-insert-cite-link
org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
org-ref-notes-function 'org-ref-notes-function-one-file
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-confirm-babel-evaluate nil
org-publish-project-alist '(("thesis" :base-directory "~/writing/thesis"
:publishing-directory "~/writing/thesis/pdf"
:publishing-function org-latex-publish-to-pdf
:base-extension "org" :with-title nil :with-toc
nil)
("talks" :base-directory "~/presentations/org/"
:publishing-directory "~/presentations/html/"
:publishing-function
org-reveal-publish-to-reveal :base-extension
"org" :with-title t :with-toc nil :recursive t)
("talks-static" :base-directory
"~/presentations/org/" :base-extension
"css\\|js\\|png\\|jpe?g\\|gif\\|pdf\\|mp3\\|ogg\\|swf\\|svg" :publishing-directory "~/presentations/html/" :recursive t :publishing-function org-publish-attachment)
)
)
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: Bug: LaTeX export does not handle .pgf/.tikz images [9.3 (9.3-elpaplus @ .emacs.d/elpa/org-plus-contrib-20191203/)]
2019-12-06 6:47 Bug: LaTeX export does not handle .pgf/.tikz images [9.3 (9.3-elpaplus @ .emacs.d/elpa/org-plus-contrib-20191203/)] Arthur
@ 2019-12-07 11:25 ` Fraga, Eric
2019-12-07 11:32 ` Nicolas Goaziou
1 sibling, 0 replies; 3+ messages in thread
From: Fraga, Eric @ 2019-12-07 11:25 UTC (permalink / raw)
To: Arthur; +Cc: emacs-orgmode@gnu.org
On Friday, 6 Dec 2019 at 17:47, Arthur wrote:
> Since my last org update (today or yesterday I would say) I have been
> having an issue with exporting .pgf or .tikz file to LaTeX. The
> exporter always returns `nil`.
Your example works just fine for me with git up to date as of a few
minutes ago (and also with org from a week ago, give or take). Maybe
something in your configuration?
--
Eric S Fraga via Emacs 27.0.50, Org release_9.3-34-g2eee3c
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: Bug: LaTeX export does not handle .pgf/.tikz images [9.3 (9.3-elpaplus @ .emacs.d/elpa/org-plus-contrib-20191203/)]
2019-12-06 6:47 Bug: LaTeX export does not handle .pgf/.tikz images [9.3 (9.3-elpaplus @ .emacs.d/elpa/org-plus-contrib-20191203/)] Arthur
2019-12-07 11:25 ` Fraga, Eric
@ 2019-12-07 11:32 ` Nicolas Goaziou
1 sibling, 0 replies; 3+ messages in thread
From: Nicolas Goaziou @ 2019-12-07 11:32 UTC (permalink / raw)
To: Arthur; +Cc: emacs-orgmode
Hello,
Arthur <maheo.arthur@gmail.com> writes:
> Since my last org update (today or yesterday I would say) I have been
> having an issue with exporting .pgf or .tikz file to LaTeX. The
> exporter always returns `nil`.
>
> I attached a patch that can fix this. It is not thoroughly tested by my
> assumption is that the `progn` does not actually "set" variable
> `image-code`, hence the `nil`.
>
> Attached:
> - org file to reproduce the error.
> - tex file output by the org exporter.
> - output of `org-submit-bug-report` (it is waaay too long)
> - the patch I wrote which basically removes the `progn` block and
> replaces it by a single `setq`.
Fixed. Thank you for the report and the patch.
Regards,
--
Nicolas Goaziou
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2019-12-07 11:32 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2019-12-06 6:47 Bug: LaTeX export does not handle .pgf/.tikz images [9.3 (9.3-elpaplus @ .emacs.d/elpa/org-plus-contrib-20191203/)] Arthur
2019-12-07 11:25 ` Fraga, Eric
2019-12-07 11:32 ` Nicolas Goaziou
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).