I've noticed 2 weirdnesses in the behavior of the `CLOCK_MODELINE_TOTAL: today` property in recent versions of org-mode:
2. Second, I have a particular heading in one of my org mode that always resets the time clocked on it every time it's clocked out. It acts as if it had `CLOCK_MODELINE_TOTAL: current`, even though it actually has `CLOCK_MODELINE_TOTAL: today`. Other headings with `CLOCK_MODELINE_TOTAL: today` seem to work as expected.
Modifying the org-decode-time line mentioned above to request local time rather than UTC seems to fix both issues for me, but I don't know why it fixes the second.
------------------------------------------------------------------------
Emacs : GNU Emacs 25.3.1 (x86_64-apple-darwin16.7.0, NS appkit-1504.83 Version 10.12.6 (Build 16G29))
of 2017-09-18
Package: Org mode version 9.1.2 (9.1.2-37-g3f8d67-elpaplus @ ~/path/to/orgdir2/.emacs.d/elpa/org-plus-contrib-20171113/)
current state:
==============
(setq
org-protocol-default-template-key "p"
org-clock-clocked-in-display 'frame-title
org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
org-agenda-skip-deadle-prewarning-if-scheduled t
org-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate
org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
(insert (format "cite:%s\n" (org-entry-get (point) "Custom_ID"))))
)
org-ref-pdf-directory "~/path/to/orgdir2/lib/"
org-agenda-auto-exclude-function 'my-org-auto-exclude-function
org-clock-history-length 23
org-occur-hook '(org-first-headline-recenter)
org-clock-in-prepare-hook '(my-org-mode-ask-effort)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-agenda-start-on-weekday nil
org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-log-done 'time
org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
org-confirm-shell-link-function 'yes-or-no-p
org-drill-scope 'agenda-with-archives
org-id-link-to-org-use-id t
org-columns-default-format "%60ITEM(Task) %10Effort(Effort){:} %10CLOCKSUM %10CLOCKSUM_T"
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-ref-open-pdf-function 'org-ref-open-pdf-at-point
org-clock-idle-time 15
org-ref-cite-onclick-function 'org-ref-cite-click-helm
org-pomodoro-started-hook '(my-org-pomodoro-caffeinate)
org-ref-insert-label-function 'org-ref-helm-insert-label-link
org-agenda-sticky t
org-ref-default-bibliography '("~/path/to/orgdir2/index.bib")
org-pretty-entities t
org-special-ctrl-a/e t
org-agenda-todo-ignore-scheduled 'future
org-agenda-skip-scheduled-if-done t
org-font-lock-hook '(org-inlinetask-fontify)
org-agenda-custom-commands '(("D" "Like d but include all TODOs (slow)"
((tags "PRIORITY=\"A\""
((org-agenda-skip-function
(quote (org-agenda-skip-entry-if (quote todo) (quote done))))
(org-agenda-overriding-header
"High-priority unfinished tasks:")
)
)
(agenda ""
((org-agenda-ndays 1)
(org-agenda-overriding-header "Schedule"))
)
(alltodo ""
((org-agenda-skip-function
(quote
(or (air-org-skip-subtree-if-habit)
(air-org-skip-subtree-if-priority 65)
(org-agenda-skip-if nil (quote (scheduled deadline))))
)
)
(org-agenda-overriding-header "ALL normal priority tasks:"))
)
)
((org-agenda-compact-blocks t)))
("d" "Daily agenda with high-priority items isolated (slow)"
((tags "PRIORITY=\"A\""
((org-agenda-skip-function
(quote (org-agenda-skip-entry-if (quote todo) (quote done))))
(org-agenda-overriding-header
"High-priority unfinished tasks:")
)
)
(agenda ""
((org-agenda-ndays 1)
(org-agenda-overriding-header "Schedule"))
)
)
((org-agenda-compact-blocks t)))
("R" "Week in review" agenda ""
((org-agenda-span (quote week) (org-agenda-start-on-weekday 0)
(org-agenda-overriding-header "Week in Review")
(org-agenda-files
(let
((org-agenda-files org-timeline-files)
(org-agenda-files nil (quote ifmode)))
)
)
(org-agenda-start-with-log-mode t)
(org-agenda-log-mode-items (quote (clock state closed)))
(org-agenda-archives-mode t))
)
)
("Q/" "Archive occur"
(lambda (unused)
(let*
((tmp
(if (boundp (quote org-agenda-text-search-extra-files))
org-agenda-text-search-extra-files (quote nil))
)
(org-agenda-text-search-extra-files
(cond ((null tmp) (quote (agenda-archives)))
((equal (car tmp) (quote agenda-archives)) tmp)
(t (cons (quote agenda-archives) tmp)))
)
)
(call-interactively (quote org-occur-in-agenda-files)))
)
"")
("Q" . "Custom queries")
("u" "Unscheduled TODOs" todo ""
((org-agenda-skip-function
(quote
(org-agenda-skip-entry-if (quote scheduled) (quote deadline)
(quote regexp) "\n]+>")
)
)
(org-agenda-overriding-header "Unscheduled TODO entries: ")
(org-agenda-sorting-strategy (quote (time-down))))
)
("n" "Agenda and all TODOs" ((agenda "") (alltodo)))
("n" "Agenda and all TODOs" ((agenda "") (alltodo ""))))
org-use-sub-superscripts '{}
org-ref-bibliography-notes "~/path/to/orgdir2/
index.org"
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-show-notification-handler '(closure (t) (message)
(terminal-notifier-notify "Org Mode" message))
org-default-notes-file "~/path/to/orgdir1/
notes.org"
org-clock-in-resume t
org-todo-keyword-faces '(("TODO" :foreground "red" :weight bold)
("NEXT" :foreground "blue" :weight bold)
("DONE" :foreground "forest green" :weight bold)
("WAITING" :foreground "orange" :weight bold)
("HOLD" :foreground "magenta" :weight bold)
("CANCELLED" :foreground "forest green" :weight bold)
("MEETING" :foreground "forest green" :weight bold)
("PHONE" :foreground "forest green" :weight bold))
org-after-todo-state-change-hook '(org-clock-out-if-current)
org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-drill-learn-fraction 0.3
org-from-is-user-regexp "\\<Robert Irelan\\>"
org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
org-drill-adjust-intervals-for-early-and-late-repetitions-p t
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-drill-left-cloze-delimiter "!|"
org-babel-pre-tangle-hook '(save-buffer)
org-font-lock-set-keywords-hook '(org-drill-add-cloze-fontification)
org-log-redeadline 'time
org-global-properties '(("Effort_ALL" .
"0:05 0:10 0:15 0:30 0:45 1:00 2:00 3:00 4:00 5:00 6:00 8:00")
("SYTLE_ALL" . "habit"))
org-mode-hook '(org-ref-org-menu org-clock-load
#[0 "\300\301\302\303\304$\207"
[add-hook change-major-mode-hook org-show-block-all append local] 5]
#[0 "\300\301\302\303\304$\207"
[add-hook change-major-mode-hook org-babel-show-result-all append local] 5]
org-babel-result-hide-spec org-babel-hide-all-hashes org-eldoc-load)
org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
org-refile-targets '((nil :maxlevel . 9) (org-agenda-files :maxlevel . 9))
org-bibtex-headline-format-function #[257 "\300 \236A\207" [:title] 3 "\n\n(fn ENTRY)"]
org-outline-path-complete-in-steps nil
org-todo-state-tags-triggers '(("CANCELLED" ("CANCELLED" . t)) ("WAITING" ("WAITING" . t))
("HOLD" ("WAITING") ("HOLD" . t)) (done ("WAITING") ("HOLD"))
("TODO" ("WAITING") ("CANCELLED") ("HOLD"))
("NEXT" ("WAITING") ("CANCELLED") ("HOLD"))
("DONE" ("WAITING") ("CANCELLED") ("HOLD")))
org-archive-hook '(org-attach-archive-delete-maybe)
org-ascii-format-drawer-function #[771 " \207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
org-pomodoro-ticking-sound "~/path/to/orgdir2/.emacs.d/lisp/org-pomodoro/resources/tick.wav"
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-clock-persist t
org-refile-use-outline-path t
org-clock-in-switch-to-state 'bh/clock-in-to-next
org-directory "~/path/to/orgdir1"
org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
org-enforce-todo-dependencies t
org-cycle-hook '(org-inlinetask-hide-tasks org-cycle-hide-archived-subtrees
org-cycle-hide-drawers org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-agenda-start-with-log-mode t
org-pomodoro-start-sound "~/path/to/orgdir2/.emacs.d/lisp/org-pomodoro/resources/bell.wav"
org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
org-export-before-processing-hook '(gsc/drill-cloze-removal)
org-agenda-text-search-extra-files '(agenda-archives "~/path/to/orgdir1/
notes.org"
org-clock-persist-query-resume nil
org-log-reschedule 'time
org-ref-clean-bibtex-key-function '(lambda (key) (replace-regexp-in-string ":" "" key))
org-refile-allow-creating-parent-nodes 'confirm
org-todo-keywords '((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d)")
(sequence "WAITING(w@/!)" "HOLD(h@/!)" "|" "CANCELLED(c@/!)" "PHONE"
"MEETING")
)
org-ref-notes-directory "~/path/to/orgdir2"
org-clock-frame-title-format '("" "%b - " org-mode-line-string)
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)
org-capture-before-finalize-hook '(org-gcal--capture-post)
org-clock-report-include-clocking-task t
org-agenda-span 1
org-drill-right-cloze-delimiter "|!"
org-gcal-client-secret "iE58YC1w8UFlQbuub7UlcjMR"
org-confirm-elisp-link-function 'yes-or-no-p
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-pomodoro-finished-hook '(my-org-pomodoro-lock-screen my-org-pomodoro-finished-notify-hook)
org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
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-agenda-skip-deadline-if-done t
org-html-format-headline-function 'org-html-format-headline-default-function
org-link-parameters '(("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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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) (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-autoref-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-eqref-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-follow-nameref :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-follow-pageref :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\">" 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)) "\\printbibliography"))
)
)
("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 (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\Glspl{%s}" path))
(t (format "%s" (upcase path))))
)
)
("acp" :follow or-follow-acronym :face org-ref-acronym-face :help-echo
or-acronym-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\glspl{%s}" path))
(t (format "%s" (upcase path))))
)
)
("Ac" :follow or-follow-acronym :face org-ref-acronym-face :help-echo
or-acronym-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\Gls{%s}" path))
(t (format "%s" (upcase path))))
)
)
("ac" :follow or-follow-acronym :face org-ref-acronym-face :help-echo
or-acronym-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\gls{%s}" path))
(t (format "%s" (upcase path))))
)
)
("acrfull" :follow or-follow-acronym :face org-ref-acronym-face
:help-echo or-acronym-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\acrfull{%s}" path))
(t (format "%s" (upcase path))))
)
)
("acrlong" :follow or-follow-acronym :face org-ref-acronym-face
:help-echo or-acronym-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\acrlong{%s}" path))
(t (format "%s" (upcase path))))
)
)
("acrshort" :follow or-follow-acronym :face org-ref-acronym-face
:help-echo or-acronym-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\acrshort{%s}" path))
(t (format "%s" (upcase path))))
)
)
("glsdesc" :follow or-follow-glossary :face org-ref-glossary-face
:help-echo or-glossary-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\glsdesc{%s}" path))
(t (format "%s" path)))
)
)
("glssymbol" :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 "\\glssymbol{%s}" path))
(t (format "%s" 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)))
)
)
("Glspl" :follow or-follow-glossary :face org-ref-glossary-face
:help-echo or-glossary-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\Glspl{%s}" path))
(t (format "%s" path)))
)
)
("Gls" :follow or-follow-glossary :face org-ref-glossary-face :help-echo
or-glossary-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\Gls{%s}" path))
(t (format "%s" path)))
)
)
("glspl" :follow or-follow-glossary :face org-ref-glossary-face
:help-echo or-glossary-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\glspl{%s}" path))
(t (format "%s" path)))
)
)
("gls" :follow or-follow-glossary :face org-ref-glossary-face :help-echo
or-glossary-tooltip :export
(closure (t) (path _ format)
(cond ((eq format (quote latex)) (format "\\gls{%s}" path))
(t (format "%s" path)))
)
)
("rmail" :follow org-rmail-open :store org-rmail-store-link)
("mhe" :follow org-mhe-open :store org-mhe-store-link)
("irc" :follow org-irc-visit :store org-irc-store-link)
("info" :follow org-info-open :export org-info-export :store
org-info-store-link)
("gnus" :follow org-gnus-open :store org-gnus-store-link)
("docview" :follow org-docview-open :export org-docview-export :store
org-docview-store-link)
("bibtex" :follow org-bibtex-open :store org-bibtex-store-link)
("bbdb" :follow org-bbdb-open :export org-bbdb-export :complete
org-bbdb-complete-link :store org-bbdb-store-link)
("w3m" :store org-w3m-store-link) ("id" :follow org-id-open)
("file+sys") ("file+emacs")
("elfeed" :follow elfeed-link-open :store elfeed-link-store-link)
("doi" :follow doi-link-menu :export
(lambda (doi desc format)
(cond
((eq format (quote html))
(format "<a href="" 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-pomodoro-long-break-sound "~/path/to/orgdir2/.emacs.d/lisp/org-pomodoro/resources/bell_multiple.wav"
org-indirect-buffer-display 'current-window
org-clock-sound "~/path/to/orgdir2/.emacs.d/Japanese Temple Bell Small-SoundBible.com-113624364.wav"
org-pomodoro-finished-sound "~/path/to/orgdir2/.emacs.d/lisp/org-pomodoro/resources/bell.wav"
org-ref-insert-link-function 'org-ref-helm-insert-cite-link
org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
org-pomodoro-short-break-sound "~/path/to/orgdir2/.emacs.d/lisp/org-pomodoro/resources/bell.wav"
org-ref-notes-function '(lambda (thekey)
(let*
((results (org-ref-get-bibtex-key-and-file thekey))
(key (car results)) (bibfile (cdr results)))
(save-excursion
(with-temp-buffer (insert-file-contents bibfile)
(bibtex-set-dialect (parsebib-find-bibtex-dialect) t)
(bibtex-search-entry key) (org-ref-open-bibtex-notes))
)
)
)
org-agenda-files "~/path/to/orgdir2/.emacs.d/agenda_files"
org-clock-out-hook '(org-clock-remove-empty-clock-drawer bh/clock-out-maybe)
org-drill-add-random-noise-to-intervals-p t
org-clock-out-remove-zero-time-clocks t
org-refile-target-verify-function 'bh/verify-refile-target
)