* "nil" prepended to all results in clojure
@ 2019-05-21 13:32 Brian Beckman
2022-03-06 18:07 ` [O] " David Lane
0 siblings, 1 reply; 2+ messages in thread
From: Brian Beckman @ 2019-05-21 13:32 UTC (permalink / raw)
To: emacs-orgmode, Brian Beckman
[-- Attachment #1: Type: text/plain, Size: 486177 bytes --]
To: emacs-orgmode@gnu.org
Subject: Bug: "nil" prepended to all results in clojure [9.2.2
(9.2.2-13-g0007df-elpaplus @
/home/brianbeckman/.emacs.d/elpa/org-plus-contrib-20190318/)]
From: Brian Beckman
<brianbeckman@pop-os.i-did-not-set--mail-host-address--so-tickle-me>
--text follows this line--
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.
------------------------------------------------------------------------
I originally submitted this to the nrepl / cider group in github because my
workaround entailed a (most likely bogus) change to nrepl, but they closed
it and told me to submit it here. My original submission is copied below.
The response of the nrepl maintainer can be found at
https://github.com/nrepl/nrepl/issues/146
## Expected behavior
in org-babel, I expect the following
```
#+begin_src clojure
(* 6 (+ 6 2))
#+end_src
#+RESULTS:
: 48
```
## Actual behavior
```
#+begin_src clojure
(* 6 (+ 6 2))
#+end_src
#+RESULTS:
: nil48
```
## Steps to reproduce the problem
Make sure your emacs init.el (or other startup fixture like .spacemacs) has
org-babel support for Cider and Clojure, as with the following
```
(require 'ob-clojure)
(org-babel-do-load-languages
'org-babel-load-languages
'(
(C . t)
(awk . t)
(clojure . t) ))
```
Make a lein new app foo so that you have a project.clj file.
Create any old .org file in the foo project directory.
Put the code snippet above in the .org file.
Do M-x cider-jack-in with the cursor in that code block.
Do C-c C-c with cursor in the code block to evaluate the code block.
See the prepended "nil?" It's the same with every other code block. Every
result gets a prepended "nil."
## my workaround
I changed `elpa/cider-20190321.2129/nrepl-dict.el::nrepl--merge` as follows
to get my stuff to work. No idea whether this is a robust or worthwhile
change.
```
(defun nrepl--merge (dict1 dict2 &optional no-join)
"Join nREPL dicts DICT1 and DICT2 in a meaningful way.
String values for non \"id\" and \"session\" keys are concatenated. Lists
are appended. nREPL dicts merged recursively. All other objects are
accumulated into a list. DICT1 is modified destructively and
then returned.
If NO-JOIN is given, return the first non nil dict."
(if no-join
(or dict1 dict2)
(cond ((null dict1) dict2)
((null dict2) dict1)
((stringp dict1) (concat dict1 dict2))
((nrepl-dict-p dict1)
(nrepl-dict-map
(lambda (k2 v2)
(nrepl-dict-put dict1 k2
(nrepl--merge (nrepl-dict-get dict1 k2)
;; bbeckman bug? CHANGED RIGHT
HERE *****
(if (and (string= k2 "value")
(stringp v2)
(string= v2 "nil"))
"" v2)
(member k2 '("id" "session")))))
dict2)
dict1)
((and (listp dict2) (listp dict1)) (append dict1 dict2))
((listp dict1) (append dict1 (list dict2)))
(t `(,dict1 ,dict2)))))
```
## Environment & Version information
```
: Emacs version: GNU Emacs 26.2 (build 2, x86_64-pc-linux-gnu, GTK+ Version
3.24.4)
: of 2019-04-12
: org version: 9.2.2
```
### Clojure version
1.10.0
### Java version
openjdk version "11.0.3" 2019-04-16
OpenJDK Runtime Environment (build 11.0.3+7-Ubuntu-1ubuntu218.10.1)
OpenJDK 64-Bit Server VM (build 11.0.3+7-Ubuntu-1ubuntu218.10.1, mixed
mode, sharing)
### Operating system
Ubuntu 18.04
Emacs : GNU Emacs 26.2 (build 2, x86_64-pc-linux-gnu, GTK+ Version 3.24.4)
of 2019-04-12
Package: Org mode version 9.2.2 (9.2.2-13-g0007df-elpaplus @
/home/brianbeckman/.emacs.d/elpa/org-plus-contrib-20190318/)
current state:
==============
(setq
org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
org-babel-after-execute-hook '(spacemacs/ob-fix-inline-images)
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
(insert
(format "cite:%s\n" (org-entry-get (point)
"Custom_ID")))
)
)
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-latex-pdf-process '("latexmk -shell-escape -bibtex -f -pdf %f")
org-imenu-depth 8
org-download-annotate-function 'org-download-annotate-default
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-ref-pdf-directory "~/Dropbox/bibliography/bibtex-pdfs/"
org-plantuml-jar-path "/usr/share/plantuml/plantuml.jar"
org-mode-hook '(org-ref-org-menu
(closure
(org-agenda-skip-regexp org-table1-hline-regexp
org-table-tab-recognizes-table\.el
org-table-dataline-regexp
org-table-any-border-regexp
org-agenda-restriction-lock-overlay
org-agenda-overriding-restriction org-agenda-diary-file
org-complex-heading-regexp t)
nil (setq imenu-create-index-function (quote
org-imenu-get-tree)))
(closure
(org--rds reftex-docstruct-symbol orgtbl-line-start-regexp
org-element-greater-elements
org-table-coordinate-overlays
org-table-auto-blank-field 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
clean-buffer-list-kill-buffer-names
org-id-link-to-org-use-id
org-agenda-buffer-name org-priority-regexp
org-mode-abbrev-table
org-mode-syntax-table buffer-face-mode-face org-mode-map
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 org-inlinetask-min-level
t)
nil
(add-hook (quote change-major-mode-hook) (quote
org-show-all)
(quote append) (quote local))
)
(closure
(org-bracket-link-regexp org-src-window-setup *this*
org-babel-confirm-evaluate-answer-no
org-src-preserve-indentation
org-src-lang-modes org-link-file-path-type
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
spacemacs/load-yasnippet toc-org-enable org-download-enable
org-bullets-mode spacemacs//org-babel-do-load-languages
flyspell-mode
spacemacs/add-org-surrounds evil-org-mode org-eldoc-load
spacemacs//init-company-org-mode company-mode)
org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
org-odt-format-drawer-function '(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-archive-hook '(org-attach-archive-delete-maybe)
org-agenda-restore-windows-after-quit t
org-confirm-elisp-link-function 'yes-or-no-p
org-startup-with-inline-images t
org-ref-clean-bibtex-key-function '(lambda (key) (replace-regexp-in-string
":" "" key))
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-bibtex-headline-format-function '(closure
(org-id-locations
org-agenda-search-view-always-boolean
org-agenda-overriding-header t)
(entry) (cdr (assq :title entry)))
org-latex-format-drawer-function '(closure (t) (_ contents) contents)
org-babel-pre-tangle-hook '(save-buffer)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-ref-bibliography-notes "~/Dropbox/bibliography/notes.org"
org-babel-load-languages '((C . t) (awk . t) (clojure . t) (ditaa . t)
(dot .
t)
(emacs-lisp . t) (js . t) (latex . t) (lisp . t)
(org . t)
(perl . t) (plantuml . t) (python . t) (scheme
. t)
(sed . t)
(shell . t))
org-ref-clean-bibtex-entry-hook '(org-ref-bibtex-format-url-if-doi
orcb-key-comma
org-ref-replace-nonascii orcb-& orcb-%
org-ref-title-case-article
orcb-clean-year
orcb-key
orcb-clean-doi orcb-clean-pages
orcb-check-journal
org-ref-sort-bibtex-entry
orcb-fix-spacing)
org-log-done 'time
org-ref-insert-label-function 'org-ref-helm-insert-label-link
org-ref-open-pdf-function 'org-ref-open-pdf-at-point
org-ascii-format-drawer-function '(closure (t) (_name contents _width)
contents)
org-babel-python-command "python3"
org-ref-open-notes-function '(lambda nil (org-show-entry)
(outline-show-branches)
(outline-show-children) (org-cycle (quote
(64)))
(recenter-top-bottom 0))
org-src-lang-modes '(("dot" . graphviz-dot) ("arduino" . arduino) ("redis"
.
redis)
("php" . php) ("C" . c) ("C++" . c++) ("asymptote" .
asy)
("bash" . sh) ("beamer" . latex) ("calc" .
fundamental)
("cpp" . c++)
("ditaa" . artist) ("elisp" . emacs-lisp) ("ocaml" .
tuareg)
("screen" . shell-script) ("shell" . sh) ("sqlite" .
sql))
org-occur-hook '(org-first-headline-recenter)
org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
org-ref-insert-link-function 'org-ref-helm-insert-cite-link
org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
org-cycle-hook '(org-cycle-hide-archived-subtrees
org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
org-ref-default-bibliography '("~/Dropbox/bibliography/references.bib")
org-clock-persist-file
"/home/brianbeckman/.emacs.d/.cache/org-clock-save.el"
org-odt-format-inlinetask-function
'org-odt-format-inlinetask-default-function
org-latex-prefer-user-labels t
org-babel-tangle-lang-exts '(("perl" . "pl") ("D" . "d") ("C++" . "cpp")
("sed"
. "sed")
("python" . "py") ("lisp" . "lisp") ("latex" .
"tex")
("clojure" . "clj") ("awk" . "awk")
("emacs-lisp"
. "el")
("elisp" . "el"))
org-publish-timestamp-directory
"/home/brianbeckman/.emacs.d/.cache/.org-timestamps/"
org-export-async-init-file
"/home/brianbeckman/.emacs.d/layers/+emacs/org/local/org-async-init.el"
org-id-locations-file
"/home/brianbeckman/.emacs.d/.cache/.org-id-locations"
org-confirm-shell-link-function 'yes-or-no-p
org-link-parameters '(("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 (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Autocites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Autocites :complete
org-Autocites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("autocites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-autocites :complete
org-autocites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("supercites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-supercites :complete
org-supercites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Textcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Textcites :complete
org-Textcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("textcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-textcites :complete
org-textcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Smartcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Smartcites :complete
org-Smartcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("smartcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-smartcites :complete
org-smartcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcitetexts" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcitetexts :complete
org-footcitetexts-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcites :complete
org-footcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Parencites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Parencites :complete
org-Parencites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("parencites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-parencites :complete
org-parencites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Cites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Cites :complete
org-Cites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("cites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-cites :complete
org-cites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("fnotecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-fnotecite :complete
org-fnotecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Pnotecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Pnotecite :complete
org-Pnotecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("pnotecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-pnotecite :complete
org-pnotecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Notecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Notecite :complete
org-Notecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("notecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-notecite :complete
org-notecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footfullcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footfullcite :complete
org-footfullcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("fullcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-fullcite :complete
org-fullcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeurl" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeurl :complete
org-citeurl-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citedate*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citedate* :complete
org-citedate*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citedate" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citedate :complete
org-citedate-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citetitle*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citetitle* :complete
org-citetitle*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citetitle" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citetitle :complete
org-citetitle-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citeauthor*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citeauthor* :complete
org-Citeauthor*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Autocite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Autocite* :complete
org-Autocite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("autocite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-autocite* :complete
org-autocite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Autocite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Autocite :complete
org-Autocite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("autocite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-autocite :complete
org-autocite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("supercite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-supercite :complete
org-supercite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("parencite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-parencite* :complete
org-parencite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("cite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-cite* :complete
org-cite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Smartcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Smartcite :complete
org-Smartcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("smartcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-smartcite :complete
org-smartcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Textcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Textcite :complete
org-Textcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("textcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-textcite :complete
org-textcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcitetext" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcitetext :complete
org-footcitetext-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcite :complete
org-footcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Parencite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Parencite :complete
org-Parencite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("parencite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-parencite :complete
org-parencite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Cite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Cite :complete org-Cite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citeauthor" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citeauthor :complete
org-Citeauthor-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citealp" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citealp :complete
org-Citealp-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citealt" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citealt :complete
org-Citealt-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citep" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citep :complete
org-Citep-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citet" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citet :complete
org-Citet-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeyearpar" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeyearpar :complete
org-citeyearpar-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeyear*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeyear* :complete
org-citeyear*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeyear" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeyear :complete
org-citeyear-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeauthor*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeauthor* :complete
org-citeauthor*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeauthor" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeauthor :complete
org-citeauthor-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citetext" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citetext :complete
org-citetext-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citenum" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citenum :complete
org-citenum-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealp*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealp* :complete
org-citealp*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealp" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealp :complete
org-citealp-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealt*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealt* :complete
org-citealt*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealt" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealt :complete
org-citealt-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citep*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citep* :complete
org-citep*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citep" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citep :complete
org-citep-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citet*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citet* :complete
org-citet*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citet" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citet :complete
org-citet-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("nocite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-nocite :complete
org-nocite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("cite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-cite :complete org-cite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
:store org-ref-bibtex-store-link)
("Cref" :follow org-ref-ref-follow :export
org-ref-Cref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("cref" :follow org-ref-ref-follow :export
org-ref-cref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("autoref" :follow org-ref-ref-follow :export
org-ref-autoref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("eqref" :follow org-ref-ref-follow :export
org-ref-eqref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("nameref" :follow org-ref-ref-follow :export
org-ref-export-nameref
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("pageref" :follow org-ref-ref-follow :export
(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")
("orgit-rev" :store orgit-rev-store :follow
orgit-rev-open :export
orgit-rev-export :complete orgit-rev-complete-link)
("orgit-log" :store orgit-log-store :follow
orgit-log-open :export
orgit-log-export :complete orgit-log-complete-link)
("orgit" :store orgit-status-store :follow
orgit-status-open :export
orgit-status-export :complete
orgit-status-complete-link)
("doi" :follow doi-link-menu :export
(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)))
)
)
)
)
("elisp" :follow org--open-elisp-link)
("file" :complete org-file-complete-link)
("ftp" :follow (lambda (path) (browse-url (concat
"ftp:"
path))))
("help" :follow org--open-help-link)
("http" :follow (lambda (path) (browse-url (concat
"http:"
path))))
("https" :follow (lambda (path) (browse-url (concat
"https:" path))))
("mailto" :follow
(lambda (path) (browse-url (concat "mailto:"
path))))
("news" :follow (lambda (path) (browse-url (concat
"news:"
path))))
("shell" :follow org--open-shell-link))
org-latex-format-headline-function
'org-latex-format-headline-default-function
org-present-mode-hook '(spacemacs//org-present-start)
org-link-translation-function 'toc-org-unhrefify
org-latex-format-inlinetask-function
'org-latex-format-inlinetask-default-function
org-html-format-drawer-function '(closure
(htmlize-buffer-places
org-html-format-table-no-css t)
(_name contents) contents)
org-image-actual-width 640
org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
org-present-mode-quit-hook '(spacemacs//org-present-end)
org-html-format-headline-function
'org-html-format-headline-default-function
org-confirm-babel-evaluate nil
org-ref-cite-onclick-function 'org-ref-cite-click-helm
org-ref-notes-function 'org-ref-notes-function-one-file
org-use-speed-commands t
org-download-abbreviate-filename-function 'file-relative-name
org-default-notes-file "notes.org"
)To: emacs-orgmode@gnu.org
Subject: Bug: "nil" prepended to all results in clojure [9.2.2
(9.2.2-13-g0007df-elpaplus @
/home/brianbeckman/.emacs.d/elpa/org-plus-contrib-20190318/)]
From: Brian Beckman
<brianbeckman@pop-os.i-did-not-set--mail-host-address--so-tickle-me>
--text follows this line--
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.
------------------------------------------------------------------------
I originally submitted this to the nrepl / cider group in github because my
workaround entailed a (most likely bogus) change to nrepl, but they closed
it and told me to submit it here. My original submission is copied below.
The response of the nrepl maintainer can be found at
https://github.com/nrepl/nrepl/issues/146
## Expected behavior
in org-babel, I expect the following
```
#+begin_src clojure
(* 6 (+ 6 2))
#+end_src
#+RESULTS:
: 48
```
## Actual behavior
```
#+begin_src clojure
(* 6 (+ 6 2))
#+end_src
#+RESULTS:
: nil48
```
## Steps to reproduce the problem
Make sure your emacs init.el (or other startup fixture like .spacemacs) has
org-babel support for Cider and Clojure, as with the following
```
(require 'ob-clojure)
(org-babel-do-load-languages
'org-babel-load-languages
'(
(C . t)
(awk . t)
(clojure . t) ))
```
Make a lein new app foo so that you have a project.clj file.
Create any old .org file in the foo project directory.
Put the code snippet above in the .org file.
Do M-x cider-jack-in with the cursor in that code block.
Do C-c C-c with cursor in the code block to evaluate the code block.
See the prepended "nil?" It's the same with every other code block. Every
result gets a prepended "nil."
## my workaround
I changed `elpa/cider-20190321.2129/nrepl-dict.el::nrepl--merge` as follows
to get my stuff to work. No idea whether this is a robust or worthwhile
change.
```
(defun nrepl--merge (dict1 dict2 &optional no-join)
"Join nREPL dicts DICT1 and DICT2 in a meaningful way.
String values for non \"id\" and \"session\" keys are concatenated. Lists
are appended. nREPL dicts merged recursively. All other objects are
accumulated into a list. DICT1 is modified destructively and
then returned.
If NO-JOIN is given, return the first non nil dict."
(if no-join
(or dict1 dict2)
(cond ((null dict1) dict2)
((null dict2) dict1)
((stringp dict1) (concat dict1 dict2))
((nrepl-dict-p dict1)
(nrepl-dict-map
(lambda (k2 v2)
(nrepl-dict-put dict1 k2
(nrepl--merge (nrepl-dict-get dict1 k2)
;; bbeckman bug? CHANGED RIGHT
HERE *****
(if (and (string= k2 "value")
(stringp v2)
(string= v2 "nil"))
"" v2)
(member k2 '("id" "session")))))
dict2)
dict1)
((and (listp dict2) (listp dict1)) (append dict1 dict2))
((listp dict1) (append dict1 (list dict2)))
(t `(,dict1 ,dict2)))))
```
## Environment & Version information
```
: Emacs version: GNU Emacs 26.2 (build 2, x86_64-pc-linux-gnu, GTK+ Version
3.24.4)
: of 2019-04-12
: org version: 9.2.2
```
### Clojure version
1.10.0
### Java version
openjdk version "11.0.3" 2019-04-16
OpenJDK Runtime Environment (build 11.0.3+7-Ubuntu-1ubuntu218.10.1)
OpenJDK 64-Bit Server VM (build 11.0.3+7-Ubuntu-1ubuntu218.10.1, mixed
mode, sharing)
### Operating system
Ubuntu 18.04
Emacs : GNU Emacs 26.2 (build 2, x86_64-pc-linux-gnu, GTK+ Version 3.24.4)
of 2019-04-12
Package: Org mode version 9.2.2 (9.2.2-13-g0007df-elpaplus @
/home/brianbeckman/.emacs.d/elpa/org-plus-contrib-20190318/)
current state:
==============
(setq
org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
org-babel-after-execute-hook '(spacemacs/ob-fix-inline-images)
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
(insert
(format "cite:%s\n" (org-entry-get (point)
"Custom_ID")))
)
)
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-latex-pdf-process '("latexmk -shell-escape -bibtex -f -pdf %f")
org-imenu-depth 8
org-download-annotate-function 'org-download-annotate-default
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-ref-pdf-directory "~/Dropbox/bibliography/bibtex-pdfs/"
org-plantuml-jar-path "/usr/share/plantuml/plantuml.jar"
org-mode-hook '(org-ref-org-menu
(closure
(org-agenda-skip-regexp org-table1-hline-regexp
org-table-tab-recognizes-table\.el
org-table-dataline-regexp
org-table-any-border-regexp
org-agenda-restriction-lock-overlay
org-agenda-overriding-restriction org-agenda-diary-file
org-complex-heading-regexp t)
nil (setq imenu-create-index-function (quote
org-imenu-get-tree)))
(closure
(org--rds reftex-docstruct-symbol orgtbl-line-start-regexp
org-element-greater-elements
org-table-coordinate-overlays
org-table-auto-blank-field 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
clean-buffer-list-kill-buffer-names
org-id-link-to-org-use-id
org-agenda-buffer-name org-priority-regexp
org-mode-abbrev-table
org-mode-syntax-table buffer-face-mode-face org-mode-map
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 org-inlinetask-min-level
t)
nil
(add-hook (quote change-major-mode-hook) (quote
org-show-all)
(quote append) (quote local))
)
(closure
(org-bracket-link-regexp org-src-window-setup *this*
org-babel-confirm-evaluate-answer-no
org-src-preserve-indentation
org-src-lang-modes org-link-file-path-type
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
spacemacs/load-yasnippet toc-org-enable org-download-enable
org-bullets-mode spacemacs//org-babel-do-load-languages
flyspell-mode
spacemacs/add-org-surrounds evil-org-mode org-eldoc-load
spacemacs//init-company-org-mode company-mode)
org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
org-odt-format-drawer-function '(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-archive-hook '(org-attach-archive-delete-maybe)
org-agenda-restore-windows-after-quit t
org-confirm-elisp-link-function 'yes-or-no-p
org-startup-with-inline-images t
org-ref-clean-bibtex-key-function '(lambda (key) (replace-regexp-in-string
":" "" key))
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-bibtex-headline-format-function '(closure
(org-id-locations
org-agenda-search-view-always-boolean
org-agenda-overriding-header t)
(entry) (cdr (assq :title entry)))
org-latex-format-drawer-function '(closure (t) (_ contents) contents)
org-babel-pre-tangle-hook '(save-buffer)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-ref-bibliography-notes "~/Dropbox/bibliography/notes.org"
org-babel-load-languages '((C . t) (awk . t) (clojure . t) (ditaa . t)
(dot .
t)
(emacs-lisp . t) (js . t) (latex . t) (lisp . t)
(org . t)
(perl . t) (plantuml . t) (python . t) (scheme
. t)
(sed . t)
(shell . t))
org-ref-clean-bibtex-entry-hook '(org-ref-bibtex-format-url-if-doi
orcb-key-comma
org-ref-replace-nonascii orcb-& orcb-%
org-ref-title-case-article
orcb-clean-year
orcb-key
orcb-clean-doi orcb-clean-pages
orcb-check-journal
org-ref-sort-bibtex-entry
orcb-fix-spacing)
org-log-done 'time
org-ref-insert-label-function 'org-ref-helm-insert-label-link
org-ref-open-pdf-function 'org-ref-open-pdf-at-point
org-ascii-format-drawer-function '(closure (t) (_name contents _width)
contents)
org-babel-python-command "python3"
org-ref-open-notes-function '(lambda nil (org-show-entry)
(outline-show-branches)
(outline-show-children) (org-cycle (quote
(64)))
(recenter-top-bottom 0))
org-src-lang-modes '(("dot" . graphviz-dot) ("arduino" . arduino) ("redis"
.
redis)
("php" . php) ("C" . c) ("C++" . c++) ("asymptote" .
asy)
("bash" . sh) ("beamer" . latex) ("calc" .
fundamental)
("cpp" . c++)
("ditaa" . artist) ("elisp" . emacs-lisp) ("ocaml" .
tuareg)
("screen" . shell-script) ("shell" . sh) ("sqlite" .
sql))
org-occur-hook '(org-first-headline-recenter)
org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
org-ref-insert-link-function 'org-ref-helm-insert-cite-link
org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
org-cycle-hook '(org-cycle-hide-archived-subtrees
org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
org-ref-default-bibliography '("~/Dropbox/bibliography/references.bib")
org-clock-persist-file
"/home/brianbeckman/.emacs.d/.cache/org-clock-save.el"
org-odt-format-inlinetask-function
'org-odt-format-inlinetask-default-function
org-latex-prefer-user-labels t
org-babel-tangle-lang-exts '(("perl" . "pl") ("D" . "d") ("C++" . "cpp")
("sed"
. "sed")
("python" . "py") ("lisp" . "lisp") ("latex" .
"tex")
("clojure" . "clj") ("awk" . "awk")
("emacs-lisp"
. "el")
("elisp" . "el"))
org-publish-timestamp-directory
"/home/brianbeckman/.emacs.d/.cache/.org-timestamps/"
org-export-async-init-file
"/home/brianbeckman/.emacs.d/layers/+emacs/org/local/org-async-init.el"
org-id-locations-file
"/home/brianbeckman/.emacs.d/.cache/.org-id-locations"
org-confirm-shell-link-function 'yes-or-no-p
org-link-parameters '(("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 (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Autocites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Autocites :complete
org-Autocites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("autocites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-autocites :complete
org-autocites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("supercites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-supercites :complete
org-supercites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Textcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Textcites :complete
org-Textcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("textcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-textcites :complete
org-textcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Smartcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Smartcites :complete
org-Smartcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("smartcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-smartcites :complete
org-smartcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcitetexts" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcitetexts :complete
org-footcitetexts-complete-link :help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcites :complete
org-footcites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Parencites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Parencites :complete
org-Parencites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("parencites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-parencites :complete
org-parencites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Cites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Cites :complete
org-Cites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("cites" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-cites :complete
org-cites-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("fnotecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-fnotecite :complete
org-fnotecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Pnotecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Pnotecite :complete
org-Pnotecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("pnotecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-pnotecite :complete
org-pnotecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Notecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Notecite :complete
org-Notecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("notecite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-notecite :complete
org-notecite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footfullcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footfullcite :complete
org-footfullcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("fullcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-fullcite :complete
org-fullcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeurl" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeurl :complete
org-citeurl-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citedate*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citedate* :complete
org-citedate*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citedate" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citedate :complete
org-citedate-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citetitle*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citetitle* :complete
org-citetitle*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citetitle" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citetitle :complete
org-citetitle-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citeauthor*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citeauthor* :complete
org-Citeauthor*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Autocite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Autocite* :complete
org-Autocite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("autocite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-autocite* :complete
org-autocite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Autocite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Autocite :complete
org-Autocite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("autocite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-autocite :complete
org-autocite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("supercite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-supercite :complete
org-supercite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("parencite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-parencite* :complete
org-parencite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("cite*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-cite* :complete
org-cite*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Smartcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Smartcite :complete
org-Smartcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("smartcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-smartcite :complete
org-smartcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Textcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Textcite :complete
org-Textcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("textcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-textcite :complete
org-textcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcitetext" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcitetext :complete
org-footcitetext-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("footcite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-footcite :complete
org-footcite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Parencite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Parencite :complete
org-Parencite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("parencite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-parencite :complete
org-parencite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Cite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Cite :complete org-Cite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citeauthor" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citeauthor :complete
org-Citeauthor-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citealp" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citealp :complete
org-Citealp-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citealt" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citealt :complete
org-Citealt-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citep" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citep :complete
org-Citep-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("Citet" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-Citet :complete
org-Citet-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeyearpar" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeyearpar :complete
org-citeyearpar-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeyear*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeyear* :complete
org-citeyear*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeyear" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeyear :complete
org-citeyear-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeauthor*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeauthor* :complete
org-citeauthor*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citeauthor" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citeauthor :complete
org-citeauthor-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citetext" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citetext :complete
org-citetext-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citenum" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citenum :complete
org-citenum-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealp*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealp* :complete
org-citealp*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealp" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealp :complete
org-citealp-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealt*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealt* :complete
org-citealt*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citealt" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citealt :complete
org-citealt-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citep*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citep* :complete
org-citep*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citep" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citep :complete
org-citep-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citet*" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citet* :complete
org-citet*-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("citet" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-citet :complete
org-citet-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("nocite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-nocite :complete
org-nocite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
)
("cite" :follow
(lambda (_) (funcall org-ref-cite-onclick-function
nil))
:export
org-ref-format-cite :complete org-cite-complete-link
:help-echo
(lambda (window object position)
(when org-ref-show-citation-on-enter
(save-excursion (goto-char position)
(let
((s (org-ref-format-entry
(org-ref-get-bibtex-key-under-cursor)))
)
(with-temp-buffer (insert s) (fill-paragraph)
(buffer-string)))
)
)
)
:face org-ref-cite-link-face-fn :display full
:keymap
(keymap (S-up . org-ref-sort-citation-link)
(S-right lambda nil (interactive)
(org-ref-swap-citation-link 1))
(S-left lambda nil (interactive)
(org-ref-swap-citation-link -1))
(C-right . org-ref-next-key) (C-left .
org-ref-previous-key)
(16777337 lambda nil
"Paste key at point. Assumes the first thing in
the
killring is a key."
(interactive) (org-ref-insert-key-at-point (car
kill-ring)))
(16777303 lambda nil "Copy all the keys at point."
(interactive)
(kill-new (org-element-property :path
(org-element-context))))
(16777335 lambda nil (interactive)
(kill-new (car
(org-ref-get-bibtex-key-and-file))))
(16777318 lambda nil (interactive)
(save-excursion (org-ref-open-citation-at-point)
(kill-new
(org-ref-format-bibtex-entry-at-point)))
)
(16777319 . org-ref-google-scholar-at-point)
(16777317 lambda nil "Email entry at point"
(interactive)
(org-ref-open-citation-at-point)
(org-ref-email-bibtex-entry))
(16777315 . org-ref-wos-citing-at-point)
(16777330 . org-ref-wos-related-at-point)
(16777326 . org-ref-open-notes-at-point)
(16777328 . org-ref-open-pdf-at-point)
(16777333 . org-ref-open-url-at-point)
(16777314 . org-ref-open-citation-at-point)
(16777327 . org-ref-cite-hydra/body) (follow-link .
mouse-face)
(mouse-3 . org-find-file-at-mouse) (mouse-2 .
org-open-at-mouse))
:store org-ref-bibtex-store-link)
("Cref" :follow org-ref-ref-follow :export
org-ref-Cref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("cref" :follow org-ref-ref-follow :export
org-ref-cref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("autoref" :follow org-ref-ref-follow :export
org-ref-autoref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("eqref" :follow org-ref-ref-follow :export
org-ref-eqref-export
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("nameref" :follow org-ref-ref-follow :export
org-ref-export-nameref
:complete org-ref-complete-link :face
org-ref-ref-face-fn :help-echo
org-ref-ref-help-echo)
("pageref" :follow org-ref-ref-follow :export
(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")
("orgit-rev" :store orgit-rev-store :follow
orgit-rev-open :export
orgit-rev-export :complete orgit-rev-complete-link)
("orgit-log" :store orgit-log-store :follow
orgit-log-open :export
orgit-log-export :complete orgit-log-complete-link)
("orgit" :store orgit-status-store :follow
orgit-status-open :export
orgit-status-export :complete
orgit-status-complete-link)
("doi" :follow doi-link-menu :export
(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)))
)
)
)
)
("elisp" :follow org--open-elisp-link)
("file" :complete org-file-complete-link)
("ftp" :follow (lambda (path) (browse-url (concat
"ftp:"
path))))
("help" :follow org--open-help-link)
("http" :follow (lambda (path) (browse-url (concat
"http:"
path))))
("https" :follow (lambda (path) (browse-url (concat
"https:" path))))
("mailto" :follow
(lambda (path) (browse-url (concat "mailto:"
path))))
("news" :follow (lambda (path) (browse-url (concat
"news:"
path))))
("shell" :follow org--open-shell-link))
org-latex-format-headline-function
'org-latex-format-headline-default-function
org-present-mode-hook '(spacemacs//org-present-start)
org-link-translation-function 'toc-org-unhrefify
org-latex-format-inlinetask-function
'org-latex-format-inlinetask-default-function
org-html-format-drawer-function '(closure
(htmlize-buffer-places
org-html-format-table-no-css t)
(_name contents) contents)
org-image-actual-width 640
org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
org-present-mode-quit-hook '(spacemacs//org-present-end)
org-html-format-headline-function
'org-html-format-headline-default-function
org-confirm-babel-evaluate nil
org-ref-cite-onclick-function 'org-ref-cite-click-helm
org-ref-notes-function 'org-ref-notes-function-one-file
org-use-speed-commands t
org-download-abbreviate-filename-function 'file-relative-name
org-default-notes-file "notes.org"
)
[-- Attachment #2: Type: text/html, Size: 662842 bytes --]
^ permalink raw reply [flat|nested] 2+ messages in thread* Re: [O] "nil" prepended to all results in clojure
2019-05-21 13:32 "nil" prepended to all results in clojure Brian Beckman
@ 2022-03-06 18:07 ` David Lane
0 siblings, 0 replies; 2+ messages in thread
From: David Lane @ 2022-03-06 18:07 UTC (permalink / raw)
To: zenon lite; +Cc: emacs-orgmode
[-- Attachment #1: Type: text/plain, Size: 79881 bytes --]
z
On Fri, May 24, 2019 at 8:51 AM Brian Beckman <bc.beckman@gmail.com> wrote:
> To: emacs-orgmode@gnu.org
> Subject: Bug: "nil" prepended to all results in clojure [9.2.2
> (9.2.2-13-g0007df-elpaplus @
> /home/brianbeckman/.emacs.d/elpa/org-plus-contrib-20190318/)]
> From: Brian Beckman
> <brianbeckman@pop-os.i-did-not-set--mail-host-address--so-tickle-me>
> --text follows this line--
>
> 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.
> ------------------------------------------------------------------------
>
> I originally submitted this to the nrepl / cider group in github because
> my workaround entailed a (most likely bogus) change to nrepl, but they
> closed it and told me to submit it here. My original submission is copied
> below. The response of the nrepl maintainer can be found at
> https://github.com/nrepl/nrepl/issues/146
>
> ## Expected behavior
>
> in org-babel, I expect the following
> ```
> #+begin_src clojure
> (* 6 (+ 6 2))
> #+end_src
>
> #+RESULTS:
> : 48
> ```
> ## Actual behavior
> ```
> #+begin_src clojure
> (* 6 (+ 6 2))
> #+end_src
>
> #+RESULTS:
> : nil48
>
> ```
> ## Steps to reproduce the problem
>
> Make sure your emacs init.el (or other startup fixture like .spacemacs)
> has org-babel support for Cider and Clojure, as with the following
>
> ```
> (require 'ob-clojure)
> (org-babel-do-load-languages
> 'org-babel-load-languages
> '(
> (C . t)
> (awk . t)
> (clojure . t) ))
> ```
> Make a lein new app foo so that you have a project.clj file.
> Create any old .org file in the foo project directory.
> Put the code snippet above in the .org file.
> Do M-x cider-jack-in with the cursor in that code block.
> Do C-c C-c with cursor in the code block to evaluate the code block.
> See the prepended "nil?" It's the same with every other code block. Every
> result gets a prepended "nil."
>
> ## my workaround
>
> I changed `elpa/cider-20190321.2129/nrepl-dict.el::nrepl--merge` as
> follows to get my stuff to work. No idea whether this is a robust or
> worthwhile change.
>
> ```
> (defun nrepl--merge (dict1 dict2 &optional no-join)
> "Join nREPL dicts DICT1 and DICT2 in a meaningful way.
> String values for non \"id\" and \"session\" keys are concatenated. Lists
> are appended. nREPL dicts merged recursively. All other objects are
> accumulated into a list. DICT1 is modified destructively and
> then returned.
> If NO-JOIN is given, return the first non nil dict."
> (if no-join
> (or dict1 dict2)
> (cond ((null dict1) dict2)
> ((null dict2) dict1)
> ((stringp dict1) (concat dict1 dict2))
> ((nrepl-dict-p dict1)
> (nrepl-dict-map
> (lambda (k2 v2)
> (nrepl-dict-put dict1 k2
> (nrepl--merge (nrepl-dict-get dict1 k2)
> ;; bbeckman bug? CHANGED
> RIGHT HERE *****
> (if (and (string= k2 "value")
> (stringp v2)
> (string= v2 "nil"))
> "" v2)
> (member k2 '("id"
> "session")))))
> dict2)
> dict1)
> ((and (listp dict2) (listp dict1)) (append dict1 dict2))
> ((listp dict1) (append dict1 (list dict2)))
> (t `(,dict1 ,dict2)))))
>
> ```
>
> ## Environment & Version information
>
> ```
> : Emacs version: GNU Emacs 26.2 (build 2, x86_64-pc-linux-gnu, GTK+
> Version 3.24.4)
> : of 2019-04-12
> : org version: 9.2.2
>
> ```
> ### Clojure version
> 1.10.0
>
> ### Java version
>
> openjdk version "11.0.3" 2019-04-16
> OpenJDK Runtime Environment (build 11.0.3+7-Ubuntu-1ubuntu218.10.1)
> OpenJDK 64-Bit Server VM (build 11.0.3+7-Ubuntu-1ubuntu218.10.1, mixed
> mode, sharing)
>
> ### Operating system
>
> Ubuntu 18.04
>
> Emacs : GNU Emacs 26.2 (build 2, x86_64-pc-linux-gnu, GTK+ Version 3.24.4)
> of 2019-04-12
> Package: Org mode version 9.2.2 (9.2.2-13-g0007df-elpaplus @
> /home/brianbeckman/.emacs.d/elpa/org-plus-contrib-20190318/)
>
> current state:
> ==============
> (setq
> org-src-mode-hook '(org-src-babel-configure-edit-buffer
> org-src-mode-configure-edit-buffer)
> org-babel-after-execute-hook '(spacemacs/ob-fix-inline-images)
> org-metadown-hook '(org-babel-pop-to-session-maybe)
> org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
> org-html-format-inlinetask-function
> 'org-html-format-inlinetask-default-function
> org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
> (insert
> (format "cite:%s\n" (org-entry-get (point)
> "Custom_ID")))
> )
> )
> org-odt-format-headline-function 'org-odt-format-headline-default-function
> org-latex-pdf-process '("latexmk -shell-escape -bibtex -f -pdf %f")
> org-imenu-depth 8
> org-download-annotate-function 'org-download-annotate-default
> org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
> org-ref-pdf-directory "~/Dropbox/bibliography/bibtex-pdfs/"
> org-plantuml-jar-path "/usr/share/plantuml/plantuml.jar"
> org-mode-hook '(org-ref-org-menu
> (closure
> (org-agenda-skip-regexp org-table1-hline-regexp
> org-table-tab-recognizes-table\.el
> org-table-dataline-regexp
> org-table-any-border-regexp
> org-agenda-restriction-lock-overlay
> org-agenda-overriding-restriction org-agenda-diary-file
> org-complex-heading-regexp t)
> nil (setq imenu-create-index-function (quote
>
> org-imenu-get-tree)))
> (closure
> (org--rds reftex-docstruct-symbol
> orgtbl-line-start-regexp
> org-element-greater-elements
> org-table-coordinate-overlays
> org-table-auto-blank-field 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
> clean-buffer-list-kill-buffer-names
> org-id-link-to-org-use-id
> org-agenda-buffer-name org-priority-regexp
> org-mode-abbrev-table
> org-mode-syntax-table buffer-face-mode-face org-mode-map
> 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 org-inlinetask-min-level
> t)
> nil
> (add-hook (quote change-major-mode-hook) (quote
> org-show-all)
> (quote append) (quote local))
> )
> (closure
> (org-bracket-link-regexp org-src-window-setup *this*
> org-babel-confirm-evaluate-answer-no
> org-src-preserve-indentation
> org-src-lang-modes org-link-file-path-type
> 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
> spacemacs/load-yasnippet toc-org-enable
> org-download-enable
> org-bullets-mode spacemacs//org-babel-do-load-languages
> flyspell-mode
> spacemacs/add-org-surrounds evil-org-mode org-eldoc-load
> spacemacs//init-company-org-mode company-mode)
> org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
> org-odt-format-drawer-function '(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-archive-hook '(org-attach-archive-delete-maybe)
> org-agenda-restore-windows-after-quit t
> org-confirm-elisp-link-function 'yes-or-no-p
> org-startup-with-inline-images t
> org-ref-clean-bibtex-key-function '(lambda (key)
> (replace-regexp-in-string ":" "" key))
> org-agenda-before-write-hook '(org-agenda-add-entry-text)
> org-metaup-hook '(org-babel-load-in-session-maybe)
> org-bibtex-headline-format-function '(closure
> (org-id-locations
>
> org-agenda-search-view-always-boolean
> org-agenda-overriding-header t)
> (entry) (cdr (assq :title entry)))
> org-latex-format-drawer-function '(closure (t) (_ contents) contents)
> org-babel-pre-tangle-hook '(save-buffer)
> org-tab-first-hook '(org-babel-hide-result-toggle-maybe
> org-babel-header-arg-expand)
> org-ref-bibliography-notes "~/Dropbox/bibliography/notes.org"
> org-babel-load-languages '((C . t) (awk . t) (clojure . t) (ditaa . t)
> (dot .
> t)
> (emacs-lisp . t) (js . t) (latex . t) (lisp .
> t)
> (org . t)
> (perl . t) (plantuml . t) (python . t) (scheme
> . t)
> (sed . t)
> (shell . t))
> org-ref-clean-bibtex-entry-hook '(org-ref-bibtex-format-url-if-doi
> orcb-key-comma
> org-ref-replace-nonascii orcb-& orcb-%
> org-ref-title-case-article
> orcb-clean-year
> orcb-key
> orcb-clean-doi orcb-clean-pages
> orcb-check-journal
> org-ref-sort-bibtex-entry
> orcb-fix-spacing)
> org-log-done 'time
> org-ref-insert-label-function 'org-ref-helm-insert-label-link
> org-ref-open-pdf-function 'org-ref-open-pdf-at-point
> org-ascii-format-drawer-function '(closure (t) (_name contents _width)
> contents)
> org-babel-python-command "python3"
> org-ref-open-notes-function '(lambda nil (org-show-entry)
> (outline-show-branches)
> (outline-show-children) (org-cycle (quote
> (64)))
> (recenter-top-bottom 0))
> org-src-lang-modes '(("dot" . graphviz-dot) ("arduino" . arduino)
> ("redis" .
> redis)
> ("php" . php) ("C" . c) ("C++" . c++) ("asymptote" .
> asy)
> ("bash" . sh) ("beamer" . latex) ("calc" .
> fundamental)
> ("cpp" . c++)
> ("ditaa" . artist) ("elisp" . emacs-lisp) ("ocaml" .
> tuareg)
> ("screen" . shell-script) ("shell" . sh) ("sqlite" .
> sql))
> org-occur-hook '(org-first-headline-recenter)
> org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
> org-ref-insert-link-function 'org-ref-helm-insert-cite-link
> org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
> org-cycle-hook '(org-cycle-hide-archived-subtrees
> org-cycle-show-empty-lines
> org-optimize-window-after-visibility-change)
> org-speed-command-hook '(org-speed-command-activate
> org-babel-speed-command-activate)
> org-ref-default-bibliography '("~/Dropbox/bibliography/references.bib")
> org-clock-persist-file
> "/home/brianbeckman/.emacs.d/.cache/org-clock-save.el"
> org-odt-format-inlinetask-function
> 'org-odt-format-inlinetask-default-function
> org-latex-prefer-user-labels t
> org-babel-tangle-lang-exts '(("perl" . "pl") ("D" . "d") ("C++" . "cpp")
> ("sed"
>
> . "sed")
> ("python" . "py") ("lisp" . "lisp") ("latex"
> .
> "tex")
> ("clojure" . "clj") ("awk" . "awk")
> ("emacs-lisp"
> . "el")
> ("elisp" . "el"))
> org-publish-timestamp-directory
> "/home/brianbeckman/.emacs.d/.cache/.org-timestamps/"
> org-export-async-init-file
> "/home/brianbeckman/.emacs.d/layers/+emacs/org/local/org-async-init.el"
> org-id-locations-file
> "/home/brianbeckman/.emacs.d/.cache/.org-id-locations"
> org-confirm-shell-link-function 'yes-or-no-p
> org-link-parameters '(("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 (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("Autocites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-Autocites :complete
> org-Autocites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("autocites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-autocites :complete
> org-autocites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("supercites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-supercites :complete
> org-supercites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("Textcites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-Textcites :complete
> org-Textcites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("textcites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-textcites :complete
> org-textcites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("Smartcites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-Smartcites :complete
> org-Smartcites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("smartcites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-smartcites :complete
> org-smartcites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("footcitetexts" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-footcitetexts :complete
> org-footcitetexts-complete-link :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("footcites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-footcites :complete
> org-footcites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("Parencites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-Parencites :complete
> org-Parencites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("parencites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-parencites :complete
> org-parencites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("Cites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-Cites :complete
> org-Cites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("cites" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-cites :complete
> org-cites-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("fnotecite" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-fnotecite :complete
> org-fnotecite-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("Pnotecite" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-Pnotecite :complete
> org-Pnotecite-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("pnotecite" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-pnotecite :complete
> org-pnotecite-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("Notecite" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-Notecite :complete
> org-Notecite-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("notecite" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-notecite :complete
> org-notecite-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
> (keymap (S-up . org-ref-sort-citation-link)
> (S-right lambda nil (interactive)
> (org-ref-swap-citation-link 1))
> (S-left lambda nil (interactive)
> (org-ref-swap-citation-link -1))
> (C-right . org-ref-next-key) (C-left .
>
> org-ref-previous-key)
> (16777337 lambda nil
> "Paste key at point. Assumes the first thing in
> the
> killring is a key."
> (interactive) (org-ref-insert-key-at-point (car
>
> kill-ring)))
> (16777303 lambda nil "Copy all the keys at point."
> (interactive)
> (kill-new (org-element-property :path
> (org-element-context))))
> (16777335 lambda nil (interactive)
> (kill-new (car
> (org-ref-get-bibtex-key-and-file))))
> (16777318 lambda nil (interactive)
> (save-excursion (org-ref-open-citation-at-point)
> (kill-new
> (org-ref-format-bibtex-entry-at-point)))
> )
> (16777319 . org-ref-google-scholar-at-point)
> (16777317 lambda nil "Email entry at point"
> (interactive)
> (org-ref-open-citation-at-point)
> (org-ref-email-bibtex-entry))
> (16777315 . org-ref-wos-citing-at-point)
> (16777330 . org-ref-wos-related-at-point)
> (16777326 . org-ref-open-notes-at-point)
> (16777328 . org-ref-open-pdf-at-point)
> (16777333 . org-ref-open-url-at-point)
> (16777314 . org-ref-open-citation-at-point)
> (16777327 . org-ref-cite-hydra/body) (follow-link
> .
> mouse-face)
> (mouse-3 . org-find-file-at-mouse) (mouse-2 .
>
> org-open-at-mouse))
> )
> ("footfullcite" :follow
> (lambda (_) (funcall org-ref-cite-onclick-function
> nil))
> :export
> org-ref-format-footfullcite :complete
> org-footfullcite-complete-link
> :help-echo
> (lambda (window object position)
> (when org-ref-show-citation-on-enter
> (save-excursion (goto-char position)
> (let
> ((s (org-ref-format-entry
> (org-ref-get-bibtex-key-under-cursor)))
> )
> (with-temp-buffer (insert s) (fill-paragraph)
> (buffer-string)))
> )
> )
> )
> :face org-ref-cite-link-face-fn :display full
> :keymap
>
>
[-- Attachment #2: Type: text/html, Size: 104884 bytes --]
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2022-03-06 18:14 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2019-05-21 13:32 "nil" prepended to all results in clojure Brian Beckman
2022-03-06 18:07 ` [O] " David Lane
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).