emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
Search results ordered by [date|relevance]  view[summary|nested|Atom feed]
thread overview below | download mbox.gz: |
* Re: Bug: html export fails after upgrading to 9.4 [9.4.1 (9.4.1-elpa @ /Users/jb/Library/Preferences/Aquamacs Emacs/Packages/elpa/org-20201212/)]
  2020-12-12 19:59  2% Bug: html export fails after upgrading to 9.4 [9.4.1 (9.4.1-elpa @ /Users/jb/Library/Preferences/Aquamacs Emacs/Packages/elpa/org-20201212/)] Johannes Brauer
@ 2020-12-13  4:32  0% ` Kyle Meyer
  0 siblings, 0 replies; 43+ results
From: Kyle Meyer @ 2020-12-13  4:32 UTC (permalink / raw)
  To: Johannes Brauer; +Cc: emacs-orgmode@gnu.org


Johannes Brauer writes:

> Hi!
>
> Trying to export a buffer to html containing
>
> #+TITLE: Titel
> * header
>
> yields the error message:
> apply: Wrong type argument: listp, #("Titel" 0 5 (:parent (#0)))
>
> What can I do?

Thanks for the report and the minimal snippet.  I'm not able to trigger
the above error on 9.4.1 using the default configuration.  Based on
similar problems reported in the past, I think that you have a mixed
installation.

<https://orgmode.org/worg/org-faq.html#mixed-install>
<https://orgmode.org/list/?q=%22apply%3A+Wrong+type+argument%3A+listp%22>


^ permalink raw reply	[relevance 0%]

* Bug: html export fails after upgrading to 9.4 [9.4.1 (9.4.1-elpa @ /Users/jb/Library/Preferences/Aquamacs Emacs/Packages/elpa/org-20201212/)]
@ 2020-12-12 19:59  2% Johannes Brauer
  2020-12-13  4:32  0% ` Kyle Meyer
  0 siblings, 1 reply; 43+ results
From: Johannes Brauer @ 2020-12-12 19:59 UTC (permalink / raw)
  To: emacs-orgmode@gnu.org

Hi!

Trying to export a buffer to html containing

#+TITLE: Titel
* header

yields the error message:
apply: Wrong type argument: listp, #("Titel" 0 5 (:parent (#0)))

What can I do?

Johannes

Emacs  : Aquamacs 3.5nightly  GNU Emacs 25.3.50.1 (x86_64-apple-darwin19.6.0, NS appkit-1894.60 Version 10.15.7 (Build 19H2))
dated 2020-12-12 rev. 29cda0694004ad1fc615be7b1553fe7b9bb884ca
Package: Org mode version 9.4.1 (9.4.1-elpa @ /Users/jb/Library/Preferences/Aquamacs Emacs/Packages/elpa/org-20201212/)

current state:
==============
(setq
org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
org-shiftleft-final-hook '(windmove-left)
org-latex-default-packages-alist '(("AUTO" "inputenc" t ("pdflatex")) ("T1" "fontenc" t ("pdflatex")) ("" "graphicx" t nil)
                                    ("" "grffile" t nil) ("" "longtable" nil nil) ("" "wrapfig" nil nil) ("" "rotating" nil nil)
                                    ("normalem" "ulem" t nil) ("" "amsmath" t nil) ("" "textcomp" t nil) ("" "amssymb" t nil)
                                    ("" "capt-of" nil nil) ("greek, ngerman" "babel" t nil) ("" "hyperref" nil nil))
org-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate)
org-clock-display-default-range 'untilnow
org-re-reveal-revealjs-version "4"
org-occur-hook '(org-first-headline-recenter)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
org-confirm-shell-link-function 'yes-or-no-p
org-image-actual-width nil
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-agenda-loop-over-headlines-in-active-region nil
org-latex-pdf-process '("pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f" "%bibtex %b"
                         "pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f"
                         "pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f")
org-babel-clojure-backend 'cider
org-file-apps '((auto-mode . emacs) ("\\.mm\\'" . default) ("\\.x?html?\\'" . default) ("\\.pdf\\'" . "open -a /Applications/Skim.app %s"))
org-list-allow-alphabetical t
org-support-shift-select t
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-babel-pre-tangle-hook '(save-buffer)
org-mode-hook '(org-clock-load #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-show-all append local] 5]
                 #[0 "\301\211\207" [imenu-create-index-function org-imenu-get-tree] 2]
                 #[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-bibtex-headline-format-function '(closure (org-id-locations org-agenda-search-view-always-boolean org-agenda-overriding-header t) (entry)
                                       (cdr (assq :title entry)))
org-archive-hook '(org-attach-archive-delete-maybe)
org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-clock-persist 'history
org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
org-shiftup-final-hook '(windmove-up)
org-link-shell-confirm-function 'yes-or-no-p
org-export-before-parsing-hook '(org-attach-expand-links)
org-html-mathjax-options '((path "https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS_HTML") (scale "100") (align "center")
                            (font "TeX") (linebreaks "false") (autonumber "AMS") (indent "0em") (multlinewidth "85%") (tagindent ".8em")
                            (tagside "right"))
org-export-with-drawers '(not "LOGBOOK DRAWERNAME")
org-link-elisp-confirm-function 'yes-or-no-p
org-latex-packages-alist '(("" "minted"))
org-babel-tangle-lang-exts '(("sml" . "sml") ("clojurescript" . "cljs") ("clojure" . "clj") ("emacs-lisp" . "el") ("elisp" . "el"))
org-confirm-elisp-link-function 'yes-or-no-p
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-latex-listings 'minted
org-shiftdown-final-hook '(windmove-down)
org-html-format-headline-function 'org-html-format-headline-default-function
org-link-parameters '(("attachment" :follow org-attach-follow :complete org-attach-complete-link) ("id" :follow org-id-open)
                       ("eww" :follow org-eww-open :store org-eww-store-link) ("rmail" :follow org-rmail-open :store org-rmail-store-link)
                       ("mhe" :follow org-mhe-open :store org-mhe-store-link)
                       ("irc" :follow org-irc-visit :store org-irc-store-link :export org-irc-export)
                       ("info" :follow org-info-open :export org-info-export :store org-info-store-link)
                       ("gnus" :follow org-gnus-open :store org-gnus-store-link)
                       ("docview" :follow org-docview-open :export org-docview-export :store org-docview-store-link)
                       ("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) ("file+sys") ("file+emacs") ("shell" :follow org-link--open-shell)
                       ("news" :follow #[514 "\301\300\302Q\"\207" ["news" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("mailto" :follow #[514 "\301\300\302Q\"\207" ["mailto" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("https" :follow #[514 "\301\300\302Q\"\207" ["https" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("http" :follow #[514 "\301\300\302Q\"\207" ["http" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("ftp" :follow #[514 "\301\300\302Q\"\207" ["ftp" browse-url ":"] 6 "\n\n(fn URL ARG)"])
                       ("help" :follow org-link--open-help) ("file" :complete org-link-complete-file) ("elisp" :follow org-link--open-elisp)
                       ("doi" :follow org-link--open-doi))
org-structure-template-alist '(("n" . "notes") ("a" . "export ascii") ("c" . "center") ("C" . "comment") ("e" . "example") ("E" . "export")
                                ("h" . "export html") ("l" . "export latex") ("q" . "quote") ("s" . "src") ("v" . "verse"))
org-babel-load-languages '((clojure . t) (ruby) (scheme . t) (js . t) (haskell) (prolog) (sml . t))
org-src-preserve-indentation t
org-clock-in-hook '((lambda nil
                      (call-process "/usr/bin/osascript" nil 0 nil "-e"
                       (concat "tell application \"org-clock-statusbar\" to clock in \"" org-clock-current-task "\""))
                      )
                     )
org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
org-clock-out-hook '((lambda nil (call-process "/usr/bin/osascript" nil 0 nil "-e" "tell application \"org-clock-statusbar\" to clock out"))
                      org-clock-remove-empty-clock-drawer)
org-confirm-babel-evaluate nil
org-shiftright-final-hook '(windmove-right)
)


^ permalink raw reply	[relevance 2%]

* Re: Bug: LaTeX export to PDF [9.1.13 (9.1.13-elpa @ c:/Users/kmw/AppData/Roaming/.emacs.d/elpa/org-9.1.13/)]
  2018-06-12 11:24  1% Bug: LaTeX export to PDF [9.1.13 (9.1.13-elpa @ c:/Users/kmw/AppData/Roaming/.emacs.d/elpa/org-9.1.13/)] Meyer-Wegener, Klaus
@ 2018-06-26  9:39  0% ` Nicolas Goaziou
  0 siblings, 0 replies; 43+ results
From: Nicolas Goaziou @ 2018-06-26  9:39 UTC (permalink / raw)
  To: Meyer-Wegener, Klaus; +Cc: emacs-orgmode@gnu.org

Hello,

"Meyer-Wegener, Klaus" <klaus.meyer-wegener@fau.de> writes:

> LaTeX export stopped working when I installed org 9.1.13.  listp has the
> wrong number of arguments:
>
>  apply: Wrong type argument: listp, #("Klaus Meyer-Wegener" 0 19
>  (:parent (#0)))

It sounds like you have a mixed installation. Please make sure bundled
Org is not loaded when you install the new one from ELPA.

Regards,

-- 
Nicolas Goaziou

^ permalink raw reply	[relevance 0%]

* Bug: LaTeX export to PDF [9.1.13 (9.1.13-elpa @ c:/Users/kmw/AppData/Roaming/.emacs.d/elpa/org-9.1.13/)]
@ 2018-06-12 11:24  1% Meyer-Wegener, Klaus
  2018-06-26  9:39  0% ` Nicolas Goaziou
  0 siblings, 1 reply; 43+ results
From: Meyer-Wegener, Klaus @ 2018-06-12 11:24 UTC (permalink / raw)
  To: emacs-orgmode@gnu.org

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

Message-ID: <86efhcp7v3.fsf@CS6-NOTEBOOK-08.i-did-not-set--mail-host-address--so-tickle-me>
--text follows this line--

Dear all,

LaTeX export stopped working when I installed org 9.1.13.  listp has the
wrong number of arguments:

 apply: Wrong type argument: listp, #("Klaus Meyer-Wegener" 0 19
 (:parent (#0)))

The string is the author field (my name), but in other files, it is
something else.

Thanks,
Klaus Meyer-Wegener

Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     https://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org mailing list.
------------------------------------------------------------------------



Emacs  : GNU Emacs 25.1.1 (i686-w64-mingw32)
 of 2016-11-16
Package: Org mode version 9.1.13 (9.1.13-elpa @
c:/Users/kmw/AppData/Roaming/.emacs.d/elpa/org-9.1.13/)

current state:
==============
(setq
 org-ref-cite-onclick-function 'org-ref-cite-click-helm
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe
		      org-babel-header-arg-expand)
 org-link-parameters '(("id" :follow org-id-open)
		       ("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)
		       ("bbdb" :follow org-bbdb-open :export org-bbdb-export
			:complete org-bbdb-complete-link :store
			org-bbdb-store-link)
		       ("w3m" :store org-w3m-store-link)
		       ("printindex" :follow org-ref-index :export
			(lambda (path desc format)
			 (cond
			  ((eq format (quote latex)) (format "\\printindex")))
			 )
			)
		       ("index" :follow (lambda (path) (occur path)) :export
			(lambda (path desc format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\index{%s}" path))
			  )
			 )
			)
		       ("bibentry" :follow
			(lambda (_)
			 (funcall org-ref-cite-onclick-function nil))
			:export org-ref-format-bibentry :complete
			org-bibentry-complete-link :help-echo
			(lambda (window object position)
			 (when org-ref-show-citation-on-enter
			  (save-excursion (goto-char position)
			   (let
			    ((s
			      (org-ref-format-entry
			       (org-ref-get-bibtex-key-under-cursor))
			      )
			     )
			    (with-temp-buffer (insert s) (fill-paragraph)
			     (buffer-string))
			    )
			   )
			  )
			 )
			:face org-ref-cite-link-face-fn :display full :keymap
			(keymap (S-up . org-ref-sort-citation-link)
			 (S-right lambda nil (interactive)
			  (org-ref-swap-citation-link 1))
			 (S-left lambda nil (interactive)
			  (org-ref-swap-citation-link -1))
			 (C-right . org-ref-next-key)
			 (C-left . org-ref-previous-key)
			 (16777337 lambda nil
			  "Paste key at point. Assumes the first thing in the killring is a key."
			  (interactive)
			  (org-ref-insert-key-at-point (car kill-ring)))
			 (16777303 lambda nil "Copy all the keys at point."
			  (interactive)
			  (kill-new
			   (org-element-property :path (org-element-context)))
			  )
			 (16777335 lambda nil (interactive)
			  (kill-new (car (org-ref-get-bibtex-key-and-file))))
			 (16777318 lambda nil (interactive)
			  (save-excursion (org-ref-open-citation-at-point)
			   (kill-new (org-ref-format-bibtex-entry-at-point)))
			  )
			 (16777319 . org-ref-google-scholar-at-point)
			 (16777317 lambda nil "Email entry at point"
			  (interactive) (org-ref-open-citation-at-point)
			  (org-ref-email-bibtex-entry))
			 (16777315 . org-ref-wos-citing-at-point)
			 (16777330 . org-ref-wos-related-at-point)
			 (16777326 . org-ref-open-notes-at-point)
			 (16777328 . org-ref-open-pdf-at-point)
			 (16777333 . org-ref-open-url-at-point)
			 (16777314 . org-ref-open-citation-at-point)
			 (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-ref-follow :export
			org-ref-autoref-export :complete org-ref-complete-link
			:face org-ref-ref-face-fn :help-echo
			org-ref-ref-help-echo)
		       ("eqref" :follow org-ref-ref-follow :export
			org-ref-eqref-export :complete org-ref-complete-link
			:face org-ref-ref-face-fn :help-echo
			org-ref-ref-help-echo)
		       ("nameref" :follow org-ref-ref-follow :export
			org-ref-export-nameref :complete org-ref-complete-link
			:face org-ref-ref-face-fn :help-echo
			org-ref-ref-help-echo)
		       ("pageref" :follow org-ref-ref-follow :export
			(lambda (path desc format)
			 (cond
			  ((eq format (quote html))
			   (format "(<pageref>%s</pageref>)" path))
			  ((eq format (quote latex))
			   (format "\\pageref{%s}" path))
			  )
			 )
			:face org-ref-ref-face-fn :complete
			org-pageref-complete-link :help-echo
			org-ref-ref-help-echo)
		       ("ref" :follow org-ref-ref-follow :export
			org-ref-ref-export :complete org-ref-complete-link
			:face org-ref-ref-face-fn :help-echo
			org-ref-ref-help-echo)
		       ("label" :follow
			(lambda (label)
			 "On clicking count the number of label tags used in the buffer.\nA number
greater than one means multiple labels!"
			 (let
			  
			  ((count
			    
	

			    (org-ref-count-labels label)
			    
			    
	

	
)
	

			   )
			  
			  (message
			   
			   (format
			    
	

	

			    "%s occurence%s"
			    
	

	

			    count
			    
	

	

			    (if
			     
	

	

	

	

	

	

	

	

	

	

	

	

			     (or
			      
	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

			      (= count 0)
			      
	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

			      (> count 1)
			      
	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

	

			      )
			     
			     
			     
	

	

	

	

	

	

	

	

	

	

	

	

			     "s" "")
			    
	

	

			    )
			   
			   (org-ref-count-labels label)
			   
			   )
			  
			  )
			 )
			:export
			(lambda (keyword desc format)
			 (cond
			  ((eq format (quote html))
			   (format "<div id=\"%s\"></div>" keyword))
			  ((eq format (quote md))
			   (format "<a name=\"%s\"></a>" keyword))
			  ((eq format (quote latex))
			   (format "\\label{%s}" keyword))
			  )
			 )
			:store org-label-store-link :face
			org-ref-label-face-fn :help-echo
			(lambda (window object position)
			 (save-excursion (goto-char position)
			  (let ((s (org-ref-link-message)))
			   (let
			    ((temp-buffer (generate-new-buffer " *temp*")))
			    (save-current-buffer (set-buffer temp-buffer)
			     (unwind-protect
			      (progn (insert s) (fill-paragraph)
			       (buffer-string))
			      (and (buffer-name temp-buffer)
			       (kill-buffer temp-buffer))
			      )
			     )
			    )
			   )
			  )
			 )
			)
		       ("list-of-tables" :follow org-ref-list-of-tables
			:export
			(lambda (keyword desc format)
			 (cond
			  ((eq format (quote latex)) (format "\\listoftables"))
			  )
			 )
			)
		       ("list-of-figures" :follow org-ref-list-of-figures
			:export
			(lambda (keyword desc format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\listoffigures"))
			  )
			 )
			)
		       ("addbibresource" :follow org-ref-follow-addbibresource
			:export
			(lambda (keyword desc format)
			 (cond ((eq format (quote html)) (format ""))
			  ((eq format (quote latex))
			   (format "\\addbibresource{%s}" keyword))
			  )
			 )
			)
		       ("bibliographystyle" :export
			(lambda (keyword desc format)
			 (cond
			  ((or (eq format (quote latex))
			    (eq format (quote beamer)))
			   (format "\\bibliographystyle{%s}" keyword))
			  (t ""))
			 )
			)
		       ("printbibliography" :follow org-ref-open-bibliography
			:export
			(lambda (keyword desc format)
			 (cond
			  ((eq format (quote org))
			   (org-ref-get-org-bibliography))
			  ((eq format (quote html))
			   (org-ref-get-html-bibliography))
			  ((eq format (quote latex)) "\\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
			 ((mapping "Acp" . "Glspl") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" (cdr mapping) path))
			  (t (format "%s" (upcase path))))
			 )
			)
		       ("acp" :follow or-follow-acronym :face
			org-ref-acronym-face :help-echo or-acronym-tooltip
			:export
			(closure
			 ((mapping "acp" . "glspl") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" (cdr mapping) path))
			  (t (format "%s" (upcase path))))
			 )
			)
		       ("Ac" :follow or-follow-acronym :face
			org-ref-acronym-face :help-echo or-acronym-tooltip
			:export
			(closure ((mapping "Ac" . "Gls") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" (cdr mapping) path))
			  (t (format "%s" (upcase path))))
			 )
			)
		       ("ac" :follow or-follow-acronym :face
			org-ref-acronym-face :help-echo or-acronym-tooltip
			:export
			(closure ((mapping "ac" . "gls") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" (cdr mapping) path))
			  (t (format "%s" (upcase path))))
			 )
			)
		       ("acrfull" :follow or-follow-acronym :face
			org-ref-acronym-face :help-echo or-acronym-tooltip
			:export
			(closure
			 ((mapping "acrfull" . "acrfull") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" (cdr mapping) path))
			  (t (format "%s" (upcase path))))
			 )
			)
		       ("acrlong" :follow or-follow-acronym :face
			org-ref-acronym-face :help-echo or-acronym-tooltip
			:export
			(closure
			 ((mapping "acrlong" . "acrlong") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" (cdr mapping) path))
			  (t (format "%s" (upcase path))))
			 )
			)
		       ("acrshort" :follow or-follow-acronym :face
			org-ref-acronym-face :help-echo or-acronym-tooltip
			:export
			(closure
			 ((mapping "acrshort" . "acrshort") (--dolist-tail--)
			  t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" (cdr mapping) path))
			  (t (format "%s" (upcase path))))
			 )
			)
		       ("glslink" :follow or-follow-glossary :face
			org-ref-glossary-face :help-echo or-glossary-tooltip
			:export
			(closure (t) (path desc format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\glslink{%s}{%s}" path desc))
			  (t (format "%s" path)))
			 )
			)
		       ("glsdesc" :follow or-follow-glossary :face
			org-ref-glossary-face :help-echo or-glossary-tooltip
			:export
			(closure ((command . "glsdesc") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" command path))
			  (t (format "%s" path)))
			 )
			)
		       ("glssymbol" :follow or-follow-glossary :face
			org-ref-glossary-face :help-echo or-glossary-tooltip
			:export
			(closure ((command . "glssymbol") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" command path))
			  (t (format "%s" path)))
			 )
			)
		       ("Glspl" :follow or-follow-glossary :face
			org-ref-glossary-face :help-echo or-glossary-tooltip
			:export
			(closure ((command . "Glspl") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" command path))
			  (t (format "%s" path)))
			 )
			)
		       ("Gls" :follow or-follow-glossary :face
			org-ref-glossary-face :help-echo or-glossary-tooltip
			:export
			(closure ((command . "Gls") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" command path))
			  (t (format "%s" path)))
			 )
			)
		       ("glspl" :follow or-follow-glossary :face
			org-ref-glossary-face :help-echo or-glossary-tooltip
			:export
			(closure ((command . "glspl") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" command path))
			  (t (format "%s" path)))
			 )
			)
		       ("gls" :follow or-follow-glossary :face
			org-ref-glossary-face :help-echo or-glossary-tooltip
			:export
			(closure ((command . "gls") (--dolist-tail--) t)
			 (path _ format)
			 (cond
			  ((eq format (quote latex))
			   (format "\\%s{%s}" command path))
			  (t (format "%s" path)))
			 )
			)
		       ("bibtex" :follow org-bibtex-open :store
			org-bibtex-store-link)
		       ("file+sys") ("file+emacs")
		       ("doi" :follow doi-link-menu :export
			(lambda (doi desc format)
			 (cond
			  ((eq format (quote html))
			   (format "<a href=\"%s%s\">%s</a>"
			    doi-utils-dx-doi-org-url doi
			    (or desc (concat "doi:" doi)))
			   )
			  ((eq format (quote latex))
			   (format "\\href{%s%s}{%s}" doi-utils-dx-doi-org-url
			    doi (or desc (concat "doi:" doi)))
			   )
			  )
			 )
			)
		       ("elisp" :follow org--open-elisp-link)
		       ("file" :complete org-file-complete-link)
		       ("ftp" :follow
			(lambda (path) (browse-url (concat "ftp:" path))))
		       ("help" :follow org--open-help-link)
		       ("http" :follow
			(lambda (path) (browse-url (concat "http:" path))))
		       ("https" :follow
			(lambda (path) (browse-url (concat "https:" path))))
		       ("mailto" :follow
			(lambda (path) (browse-url (concat "mailto:" path))))
		       ("news" :follow
			(lambda (path) (browse-url (concat "news:" path))))
		       ("shell" :follow org--open-shell-link))
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-ref-create-notes-hook '((lambda nil (org-narrow-to-subtree)
			      (insert
			       (format "cite:%s\n"
				(org-entry-get (point) "Custom_ID"))
			       )
			      )
			     )
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
		  org-cycle-show-empty-lines
		  org-optimize-window-after-visibility-change)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-ref-notes-function 'org-ref-notes-function-one-file
 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-speed-command-hook '(org-speed-command-activate
			  org-babel-speed-command-activate)
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-ref-insert-cite-function 'org-ref-helm-insert-cite-link
 org-ref-open-pdf-function 'org-ref-open-pdf-at-point
 org-babel-pre-tangle-hook '(save-buffer)
 org-occur-hook '(org-first-headline-recenter)
 org-html-format-headline-function 'org-html-format-headline-default-function
 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-metaup-hook '(org-babel-load-in-session-maybe)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
 org-latex-classes '(("org-article"
		      "\\documentclass{org-article}\n       \\usepackage[AUTO]{inputenc}\n
[NO-DEFAULT-PACKAGES]\n       [PACKAGES]\n       [EXTRA]"
		      ("\\section{%s}" . "\\section*{%s}")
		      ("\\subsection{%s}" . "\\subsection*{%s}")
		      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
		      ("\\paragraph{%s}" . "\\paragraph*{%s}")
		      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
		     ("article" "\\documentclass[11pt]{article}"
		      ("\\section{%s}" . "\\section*{%s}")
		      ("\\subsection{%s}" . "\\subsection*{%s}")
		      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
		      ("\\paragraph{%s}" . "\\paragraph*{%s}")
		      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
		     ("report" "\\documentclass[11pt]{report}"
		      ("\\part{%s}" . "\\part*{%s}")
		      ("\\chapter{%s}" . "\\chapter*{%s}")
		      ("\\section{%s}" . "\\section*{%s}")
		      ("\\subsection{%s}" . "\\subsection*{%s}")
		      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
		     ("book" "\\documentclass[11pt]{book}"
		      ("\\part{%s}" . "\\part*{%s}")
		      ("\\chapter{%s}" . "\\chapter*{%s}")
		      ("\\section{%s}" . "\\section*{%s}")
		      ("\\subsection{%s}" . "\\subsection*{%s}")
		      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
		     )
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
 org-ref-insert-label-function 'org-ref-helm-insert-label-link
 org-mode-hook '(org-ref-org-menu
		 #[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-ref-insert-link-function 'org-ref-helm-insert-cite-link
 org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
 org-latex-pdf-process '("latexmk -shell-escape -bibtex -f -pdf %f")
 org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-from-is-user-regexp nil
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
		     org-src-mode-configure-edit-buffer)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-ref-clean-bibtex-key-function '(lambda (key)
				     (replace-regexp-in-string ":" "" key))
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
 org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 )

--
Prof. Dr. Klaus Meyer-Wegener,
Universitaet Erlangen-Nuernberg, Informatik 6 Datenmanagement,
Martensstr. 3, 91058 Erlangen, Germany, Tel. +49-9131-85-27892,
https://www.cs6.tf.fau.de/lehrstuhl/personen/klaus-meyer-wegener/



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

^ permalink raw reply	[relevance 1%]

* Re: Using org-mode via vSSH on iPad
  2017-06-30 14:16  5% ` Michael Ax
@ 2017-06-30 16:41  0%   ` Peter Davis
  0 siblings, 0 replies; 43+ results
From: Peter Davis @ 2017-06-30 16:41 UTC (permalink / raw)
  To: emacs-orgmode

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


Thanks, Michael. Replies below ...

On Fri, Jun 30, 2017, at 10:16 AM, Michael Ax wrote:
> > apply: Wrong type argument: listp, #("The Age of Wonder, Part II" 0
> > 26 (:parent (#0)))>  another set of parens perhaps?
> 

I just copied what was in the *Messages* buffer. I tried the sequence

C-c C-e C-b h H

to get HTML, but I got that error.

Interestingly, this worked with the same file on a desktop Mac I have. I
thought perhaps the state of emacs had somehow gotten changed, but
exiting emacs and re-starting did not help.
>  >Then, does anyone know a way to copy the contents of the vSSH app
>  >display to the iPad clipboard>  does (setq mouse-drag-copy-region t) work?


I can copy in emacs. I guess this is more of a vSSH question ... how can
I copy to the iPad clipboard so I can paste into another app.
Thanks!
-pd


--
  Peter Davis
  www.techcurmudgeon.com


[-- Attachment #2: Type: text/html, Size: 2214 bytes --]

^ permalink raw reply	[relevance 0%]

* Re: Using org-mode via vSSH on iPad
  2017-06-30 13:22  5% Using org-mode via vSSH on iPad Peter Davis
@ 2017-06-30 14:16  5% ` Michael Ax
  2017-06-30 16:41  0%   ` Peter Davis
  0 siblings, 1 reply; 43+ results
From: Michael Ax @ 2017-06-30 14:16 UTC (permalink / raw)
  To: emacs-orgmode

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

 > apply: Wrong type argument: listp, #("The Age of Wonder, Part II" 0 
26 (:parent (#0)))
another set of parens perhaps?

 >Then, does anyone know a way to copy the contents of the vSSH app 
display to the iPad clipboard
does (setq mouse-drag-copy-region t) work?

[-- Attachment #2: Type: text/html, Size: 474 bytes --]

^ permalink raw reply	[relevance 5%]

* Re: Using org-mode via vSSH on iPad
@ 2017-06-30 13:22  5% Peter Davis
  2017-06-30 14:16  5% ` Michael Ax
  0 siblings, 1 reply; 43+ results
From: Peter Davis @ 2017-06-30 13:22 UTC (permalink / raw)
  To: emacs-orgmode


Ok, now I'm having a worse problem. Trying to get HTML output in a buffer on my Mac, I'm getting this error:

apply: Wrong type argument: listp, #("The Age of Wonder, Part II" 0 26 (:parent (#0)))

Any guesses what might cause this? It seems to be dying on this line:

#+title: The Age of Wonder, Part II

but I don't know why. I even tried changing the "," to " -", but no joy. The whole header looks like this:

#+STARTUP: showeverything logdone
#+options: num:nil toc:nil
#+author: Peter Davis
#+title: The Age of Wonder, Part II



Thanks,
-pd



Peter Davis <pfd@pfdstudio.com> writes:

> I've been trying to find a way to use org-mode from my iPad (other than MobileOrg, which seems really unwieldy), and the closest I've come is to us the vSSH app to connect to my desktop Mac and run emacs there.
>
> Unfortunately, I'm running into some limitations and I'm not aware of the workarounds, if any. I'm hoping someone here might know.
>
> The most obvious is that after editing my org document, I want to export to an HTML buffer from which I could copy and paste to Blogger (in a browser). My normal key sequence
>
> C-c C-e C-b h H
>
> doesn't work, as the C-b seems to be treated as an ordinary 'b'. I don't get a window showing me the HTML export. Anyone familiar with this or how to get around it?
>
> Then, does anyone know a way to copy the contents of the vSSH app display to the iPad clipboard so I can paste into another app? I don't mind having to edit out some amount of cruft that goes with it, as long as I can get the basic HTML.
>
> Thanks very much!
>
> -pd
>
> P.S. - I've also tried using the Editorial app with md format, but I really miss org's ability to format tables and lists on the fly. Editorial doesn't seem to do that.
>
> --
> Peter Davis
> www.techcurmudgeon.com

^ permalink raw reply	[relevance 5%]

* Re: Bug: Beamer example (info node 12.8.6) fails to compile [9.0.7 (9.0.7-elpa @ /Users/gtomas/.emacs.d/elpa/org-20170515/)]
  2017-06-05 15:17  2% Bug: Beamer example (info node 12.8.6) fails to compile [9.0.7 (9.0.7-elpa @ /Users/gtomas/.emacs.d/elpa/org-20170515/)] Gil Tomás
@ 2017-06-07  9:10  0% ` Nicolas Goaziou
  0 siblings, 0 replies; 43+ results
From: Nicolas Goaziou @ 2017-06-07  9:10 UTC (permalink / raw)
  To: Gil Tomás; +Cc: emacs-orgmode

Hello,

Gil Tomás <gil.tms@gmail.com> writes:

> When copying the example provided in org-mode info node 12.8.6 to an org
> buffer, and then seeking to compile it into a pdf with the beamer
> exporter (C-c C-e l O), the following error message is printed into the
> minibuffer:
>
> apply: Wrong type argument: listp, #("Carsten Dominik" 0 15 (:parent
> (#0)))

This is a commonly reported error message. I guess it should go into the
FAQ. It means you have a mixed installation. You need to re-install Org
properly.

Regards,

-- 
Nicolas Goaziou

^ permalink raw reply	[relevance 0%]

* Bug: Beamer example (info node 12.8.6) fails to compile [9.0.7 (9.0.7-elpa @ /Users/gtomas/.emacs.d/elpa/org-20170515/)]
@ 2017-06-05 15:17  2% Gil Tomás
  2017-06-07  9:10  0% ` Nicolas Goaziou
  0 siblings, 1 reply; 43+ results
From: Gil Tomás @ 2017-06-05 15:17 UTC (permalink / raw)
  To: emacs-orgmode

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

Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org mailing list.
------------------------------------------------------------------------

When copying the example provided in org-mode info node 12.8.6 to an org
buffer, and then seeking to compile it into a pdf with the beamer
exporter (C-c C-e l O), the following error message is printed into the
minibuffer:

apply: Wrong type argument: listp, #("Carsten Dominik" 0 15 (:parent (#0)))

Emacs  : GNU Emacs 25.1.1 (x86_64-apple-darwin16.4.0, NS appkit-1504.81
Version 10.12.3 (Build 16D32))
 of 2017-03-22
Package: Org mode version 9.0.7 (9.0.7-elpa @
/Users/gtomas/.emacs.d/elpa/org-20170515/)

current state:
==============
(setq
 org-hide-leading-stars t
 org-export-babel-evaluate nil
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
 org-shiftleft-final-hook '(windmove-left)
 org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}"
                      ("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("article" "\\documentclass[11pt]{article}"
("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
                      ("\\paragraph{%s}" . "\\paragraph*{%s}")
                      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
                     ("report" "\\documentclass[11pt]{report}"
("\\part{%s}" . "\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}"
. "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" .
"\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}"
. "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     )
 org-speed-command-hook '(org-speed-command-default-hook
org-babel-speed-command-hook)
 org-occur-hook '(org-first-headline-recenter)
 org-src-tab-acts-natively t
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-log-done 'time
 org-src-window-setup 'current-window
 org-latex-format-inlinetask-function
'org-latex-format-inlinetask-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-special-ctrl-a/e t
 org-agenda-skip-scheduled-if-done t
 org-support-shift-select t
 org-latex-format-headline-function
'org-latex-format-headline-default-function
 org-default-notes-file "~/Dropbox/org/gtb.org"
 org-todo-keyword-faces '(("TODO" :background "tomato" :foreground "bisque"
:weight bold)
                          ("STARTED" :background "ForestGreen" :foreground
"bisque" :weight bold)
                          ("WAITING" :background "DarkOrange" :foreground
"bisque" :weight bold)
                          ("DONE" :background "RoyalBlue" :foreground
"bisque" :weight bold)
                          ("CANCELLED" :background "grey50" :foreground
"bisque" :weight bold))
 org-startup-indented t
 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-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
 org-tags-column -66
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(my-org-mode-hook (lambda nil (org-bullets-mode 1))
turn-on-org-cdlatex flyspell-mode
                 company-mode rainbow-delimiters-mode smartparens-mode
er/add-org-mode-expansions
                 #[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
zotelo-minor-mode
                 #[nil "\300\301!\207" [run-hooks prelude-org-mode-hook] 2])
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-use-speed-commands t
 org-ascii-format-drawer-function #[771 " \207" [] 4 "\n\n(fn NAME CONTENTS
WIDTH)"]
 org-odt-format-inlinetask-function
'org-odt-format-inlinetask-default-function
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-shiftup-final-hook '(windmove-up)
 org-bullets-bullet-list '("•")
 org-blank-before-new-entry '((heading) (plain-list-item))
 org-todo-keywords '((sequence "TODO(t)" "STARTED(s)" "WAITING(w)" "|"
"DONE(d)" "CANCELLED(c)"))
 org-modules '(org-habit)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-odd-levels-only t
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-babel-after-execute-hook '(org-display-inline-images)
 org-shiftdown-final-hook '(windmove-down)
 org-agenda-skip-deadline-if-done t
 org-html-format-headline-function
'org-html-format-headline-default-function
 org-link-parameters '(("id" :follow org-id-open) ("file+sys")
("file+emacs")
                       ("doi" :follow org--open-doi-link) ("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))))
                       ("message" :follow (lambda (path) (browse-url
(concat "message:" path))))
                       ("news" :follow (lambda (path) (browse-url (concat
"news:" path))))
                       ("shell" :follow org--open-shell-link))
 org-cycle-separator-lines 0
 org-src-preserve-indentation t
 org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
 org-habit-graph-column 50
 org-agenda-files '("~/Dropbox/org/gtd.org" "~/Dropbox/org/notes.org"
"~/Dropbox/org/culture.org")
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-confirm-babel-evaluate nil
 org-shiftright-final-hook '(windmove-right)
 )

[-- Attachment #2: Type: text/html, Size: 10200 bytes --]

^ permalink raw reply	[relevance 2%]

* Error publishing a simple html page
@ 2016-11-26 20:01  5% Leandro Noferini
  0 siblings, 0 replies; 43+ results
From: Leandro Noferini @ 2016-11-26 20:01 UTC (permalink / raw)
  To: emacs-orgmode

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

Ciao a tutti,

I defined a project to publish my blog:

(setq org-publish-project-alist
      '(("Blog"
	:base-directory "~/org/"
	:publishing-directory "~/Documenti/Personali/Blog/"
	:base-extension "org"
	:section-numbers nil
	:table-of-contents nil
	:include ("blog.org")
	:exclude ".*"
	:tasks nil
	:author "Leandro Noferini"
	:email "lnoferin@cybervalley.org"
	:link-up nil                   
	:convert-org-links t
	:publishing-function org-html-publish-to-html
	)

Trying to publish with C-c C-e P x now gives me this error:

Publishing file /home/leandro/org/blog.org using ‘org-html-publish-to-html’
org-babel-exp process nil at position 95260...
apply: Wrong type argument: listp, #("Leandro Noferini" 0 16 (:parent (#0)))

-- 
leandro
1A0B 125B 2E4D 2DAE 4E26  4551 88FB BBCC 7A29 640B
https://bbs.cybervalley.org/ChiaveLeandro/gpg.html
http://6xukrlqedfabdjrb.onion

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

^ permalink raw reply	[relevance 5%]

* Re: Bug: HTML exports issues: none not working, and issues with #+TITLE
  2016-11-07 19:30  6% Bug: HTML exports issues: none not working, and issues with #+TITLE Frederick Giasson
@ 2016-11-08 11:07  0% ` Nicolas Goaziou
  0 siblings, 0 replies; 43+ results
From: Nicolas Goaziou @ 2016-11-08 11:07 UTC (permalink / raw)
  To: Frederick Giasson; +Cc: emacs-orgmode

Hello,

Frederick Giasson <fred@fgiasson.com> writes:

> I upgraded to Emacs 25.1 and Org-mode 9.0 (latest from Elpa) and I am 
> experiencing two issues with export:
>
>
>    (1) The header parameter ":exports none" doesn't appear to be 
> working. With the following code, the code block is exported to HTML:
>
> =============
>
> #+BEGIN_SRC elisp :results silent :exports none
> (setq org-html-htmlize-output-type 'inline-css)
> #+END_SRC
>
> =============
>
>
>    (2) As soon as I have a non-empty #+TITLE: defined in a org-mode 
> file, I am getting this kind of error with exporting in HTML (or any 
> other formats):
>
> =============
>
> #+TITLE test
>
> =============
>
> returns:
>
> =============
>
> apply: Wrong type argument: listp, #("test" 0 4 (:parent (#0)))
>
> =============

This seem to indicate you have a mixed installation. See, e.g.,
<http://permalink.gmane.org/gmane.emacs.orgmode/110092>.

Regards,

-- 
Nicolas Goaziou

^ permalink raw reply	[relevance 0%]

* Bug: HTML exports issues: none not working, and issues with #+TITLE
@ 2016-11-07 19:30  6% Frederick Giasson
  2016-11-08 11:07  0% ` Nicolas Goaziou
  0 siblings, 1 reply; 43+ results
From: Frederick Giasson @ 2016-11-07 19:30 UTC (permalink / raw)
  To: emacs-orgmode

Hi,

I upgraded to Emacs 25.1 and Org-mode 9.0 (latest from Elpa) and I am 
experiencing two issues with export:


   (1) The header parameter ":exports none" doesn't appear to be 
working. With the following code, the code block is exported to HTML:

=============

#+BEGIN_SRC elisp :results silent :exports none
(setq org-html-htmlize-output-type 'inline-css)
#+END_SRC
=============


   (2) As soon as I have a non-empty #+TITLE: defined in a org-mode 
file, I am getting this kind of error with exporting in HTML (or any 
other formats):

=============

#+TITLE test

=============

returns:

=============

apply: Wrong type argument: listp, #("test" 0 4 (:parent (#0)))

=============



Thanks,


Fred

^ permalink raw reply	[relevance 6%]

* Re: Bug: HTML export is broken when there are document level headings (TITLE, AUTHOR etc.) [8.3.4 (8.3.4-elpa @ /media/home/neutrico/.emacs.d/elpa/org-20160222/)]
  2016-02-29 21:15  0% ` Nicolas Goaziou
@ 2016-02-29 21:27  0%   ` Marcin Antczak
  0 siblings, 0 replies; 43+ results
From: Marcin Antczak @ 2016-02-29 21:27 UTC (permalink / raw)
  To: emacs orgmode-mailinglist



W dniu 02/29/2016 o 10:15 PM, Nicolas Goaziou pisze:
> Hello,
>
> neutrico <marcin.antczak@neutrico.eu> writes:
>
>> Steps to reproduce:
>>
>> 1. Create org document hello.org :
>>
>> #+BEGIN_SRC org
>>
>> #TITLE: Hello
>>
>> ** World
>>
>> #+END_SRC
>>
>> 2. M-x org-html-export-as-html
>>
>> Returns:
>>
>> apply: Wrong type argument: listp, #("HELLO" 0 5 (:parent (#0)))
>>
>>
>> When I remove TITLE then it's exported propely.
> You probably have a mixed installation. This problem has been reported
> a few times already and the solution is always to reinstall Org properly
> (i.e., before built-in Org is loaded).

Yes, I know about mixed installations.
However my 'org-version is showing that everything is ok.

[8.3.4 (8.3.4-elpa @ /media/home/neutrico/.emacs.d/elpa/org-20160222/)]

1. Is this possible to remove org-mode from Emacs distribution?
As org is available as ELPA package than builtin version causes 
unnecessary trouble.

2. Is this possible to improve 'org-reload function to fix problems with 
mixed installation?

Regards,
Marcin

^ permalink raw reply	[relevance 0%]

* Re: Bug: HTML export is broken when there are document level headings (TITLE, AUTHOR etc.) [8.3.4 (8.3.4-elpa @ /media/home/neutrico/.emacs.d/elpa/org-20160222/)]
  2016-02-28 22:39  4% Bug: HTML export is broken when there are document level headings (TITLE, AUTHOR etc.) [8.3.4 (8.3.4-elpa @ /media/home/neutrico/.emacs.d/elpa/org-20160222/)] neutrico
@ 2016-02-29 21:15  0% ` Nicolas Goaziou
  2016-02-29 21:27  0%   ` Marcin Antczak
  0 siblings, 1 reply; 43+ results
From: Nicolas Goaziou @ 2016-02-29 21:15 UTC (permalink / raw)
  To: neutrico; +Cc: emacs orgmode-mailinglist

Hello,

neutrico <marcin.antczak@neutrico.eu> writes:

> Steps to reproduce:
>
> 1. Create org document hello.org :
>
> #+BEGIN_SRC org
>
> #TITLE: Hello
>
> ** World
>
> #+END_SRC
>
> 2. M-x org-html-export-as-html
>
> Returns:
>
> apply: Wrong type argument: listp, #("HELLO" 0 5 (:parent (#0)))
>
>
> When I remove TITLE then it's exported propely.

You probably have a mixed installation. This problem has been reported
a few times already and the solution is always to reinstall Org properly
(i.e., before built-in Org is loaded).

Regards,

-- 
Nicolas Goaziou

^ permalink raw reply	[relevance 0%]

* Bug: HTML export is broken when there are document level headings (TITLE, AUTHOR etc.) [8.3.4 (8.3.4-elpa @ /media/home/neutrico/.emacs.d/elpa/org-20160222/)]
@ 2016-02-28 22:39  4% neutrico
  2016-02-29 21:15  0% ` Nicolas Goaziou
  0 siblings, 1 reply; 43+ results
From: neutrico @ 2016-02-28 22:39 UTC (permalink / raw)
  To: emacs orgmode-mailinglist


Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report? See

      http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------

Steps to reproduce:

1. Create org document hello.org :

#+BEGIN_SRC org

#TITLE: Hello

** World

#+END_SRC

2. M-x org-html-export-as-html

Returns:

apply: Wrong type argument: listp, #("HELLO" 0 5 (:parent (#0)))


When I remove TITLE then it's exported propely.


Regards,
Marcin



Emacs  : GNU Emacs 25.1.50.2 (x86_64-unknown-linux-gnu, GTK+ Version 3.16.7)
  of 2016-02-28
Package: Org-mode version 8.3.4 (8.3.4-elpa @ 
/media/home/neutrico/.emacs.d/elpa/org-20160222/)

current state:
==============
(setq
  org-tab-first-hook '(org-hide-block-toggle-maybe
               org-babel-hide-result-toggle-maybe
               org-babel-header-arg-expand)
  org-speed-command-hook '(org-speed-command-default-hook
               org-babel-speed-command-hook)
  org-occur-hook '(org-first-headline-recenter)
  org-metaup-hook '(org-babel-load-in-session-maybe)
  org-html-format-drawer-function '(lambda (name contents) contents)
  org-latex-format-inlinetask-function 
'org-latex-format-inlinetask-default-function
  org-confirm-shell-link-function 'yes-or-no-p
  org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
  org-latex-format-headline-function 
'org-latex-format-headline-default-function
  org-after-todo-state-change-hook '(org-clock-out-if-current)
  org-latex-format-drawer-function '(lambda (name contents) contents)
  org-src-mode-hook '(org-src-babel-configure-edit-buffer
              org-src-mode-configure-edit-buffer)
  org-agenda-before-write-hook '(org-agenda-add-entry-text)
  org-babel-pre-tangle-hook '(save-buffer)
  org-mode-hook '(#[nil "\300\301\302\303\304$\207"
            [org-add-hook change-major-mode-hook
             org-show-block-all append local]
            5]
          #[nil "\300\301\302\303\304$\207"
            [org-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-archive-hook '(org-attach-archive-delete-maybe)
  org-ascii-format-drawer-function '(lambda (name contents width) contents)
  org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
               org-babel-execute-safely-maybe)
  org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
           org-cycle-show-empty-lines
           org-optimize-window-after-visibility-change)
  org-confirm-elisp-link-function 'yes-or-no-p
  org-metadown-hook '(org-babel-pop-to-session-maybe)
  org-html-format-headline-function 
'org-html-format-headline-default-function
  org-html-format-inlinetask-function 
'org-html-format-inlinetask-default-function
  org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
  )

^ permalink raw reply	[relevance 4%]

* Re: Bug: Cannot export document to HTML or Markdown if it has a title [8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)]
  2016-02-04  8:40  0%     ` Nicolas Goaziou
@ 2016-02-04 20:50  0%       ` Max Linke
  0 siblings, 0 replies; 43+ results
From: Max Linke @ 2016-02-04 20:50 UTC (permalink / raw)
  To: emacs-orgmode



On 02/04/2016 09:40 AM, Nicolas Goaziou wrote:
> Hello,
>
> Max Linke <max_linke@gmx.de> writes:
>
>> On 01/31/2016 11:06 PM, Nicolas Goaziou wrote:
>>> Hello,
>>>
>>> Matt Moriarity <mmoriarity@apple.com> writes:
>>>
>>>> If I include a #+TITLE: directive at the top of my Org file, when I try
>>>> to export it to HTML or markdown, I get an error:
>>>>
>>>>       apply: Wrong type argument: listp, #("Guide" 0 5 (:parent (#0)))
>>>>
>>>> Removing the #+TITLE seems to make everything ok. It seems like this
>>>> should not be an issue, but I’m pretty new to org-mode.
>>>
>>> I think this is due to a mixed Org installation: default Org from Emacs
>>> probably interferes with ELPA's.
>>
>> I'm having the same problem. According to all hints in the FAQ I don't
>> have a mixed installation.
>>
>> locate-library RET org -> 'Library is file
>> ~/.emacs.d/elpa/org-20160201/org.elc'
>>
>> I have installed org-mode from elpa according to the FAQ.
>
> Are you sure (default) Org wasn't loaded when you installed the newest
> one through ELPA?

Yes this seemed to have caused the problems. I wasn't aware that 
org-mode shouldn't be loaded when it is installed from elpa. Thanks for 
the help

best Max

^ permalink raw reply	[relevance 0%]

* Re: Bug: Cannot export document to HTML or Markdown if it has a title [8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)]
  2016-02-03 14:56  5%   ` Max Linke
@ 2016-02-04  8:40  0%     ` Nicolas Goaziou
  2016-02-04 20:50  0%       ` Max Linke
  0 siblings, 1 reply; 43+ results
From: Nicolas Goaziou @ 2016-02-04  8:40 UTC (permalink / raw)
  To: Max Linke; +Cc: emacs-orgmode

Hello,

Max Linke <max_linke@gmx.de> writes:

> On 01/31/2016 11:06 PM, Nicolas Goaziou wrote:
>> Hello,
>>
>> Matt Moriarity <mmoriarity@apple.com> writes:
>>
>>> If I include a #+TITLE: directive at the top of my Org file, when I try
>>> to export it to HTML or markdown, I get an error:
>>>
>>>      apply: Wrong type argument: listp, #("Guide" 0 5 (:parent (#0)))
>>>
>>> Removing the #+TITLE seems to make everything ok. It seems like this
>>> should not be an issue, but I’m pretty new to org-mode.
>>
>> I think this is due to a mixed Org installation: default Org from Emacs
>> probably interferes with ELPA's.
>
> I'm having the same problem. According to all hints in the FAQ I don't
> have a mixed installation.
>
> locate-library RET org -> 'Library is file
> ~/.emacs.d/elpa/org-20160201/org.elc'
>
> I have installed org-mode from elpa according to the FAQ.

Are you sure (default) Org wasn't loaded when you installed the newest
one through ELPA?

In any case, IIRC, this is an installation problem, not a real bug in
the code base.

Regards,

-- 
Nicolas Goaziou

^ permalink raw reply	[relevance 0%]

* Re: Bug: Cannot export document to HTML or Markdown if it has a title [8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)]
  2016-01-31 22:06  0% ` Nicolas Goaziou
@ 2016-02-03 14:56  5%   ` Max Linke
  2016-02-04  8:40  0%     ` Nicolas Goaziou
  0 siblings, 1 reply; 43+ results
From: Max Linke @ 2016-02-03 14:56 UTC (permalink / raw)
  To: emacs-orgmode



On 01/31/2016 11:06 PM, Nicolas Goaziou wrote:
 > Hello,
 >
 > Matt Moriarity <mmoriarity@apple.com> writes:
 >
 >> If I include a #+TITLE: directive at the top of my Org file, when I try
 >> to export it to HTML or markdown, I get an error:
 >>
 >>      apply: Wrong type argument: listp, #("Guide" 0 5 (:parent (#0)))
 >>
 >> Removing the #+TITLE seems to make everything ok. It seems like this
 >> should not be an issue, but I’m pretty new to org-mode.
 >
 > I think this is due to a mixed Org installation: default Org from Emacs
 > probably interferes with ELPA's.

I'm having the same problem. According to all hints in the FAQ I don't 
have a mixed installation.

locate-library RET org -> 'Library is file 
~/.emacs.d/elpa/org-20160201/org.elc'

I have installed org-mode from elpa according to the FAQ.

best Max

^ permalink raw reply	[relevance 5%]

* Re: Bug: Cannot export document to HTML or Markdown if it has a title [8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)]
  2016-01-20  7:39  3% Bug: Cannot export document to HTML or Markdown if it has a title [8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)] Matt Moriarity
@ 2016-01-31 22:06  0% ` Nicolas Goaziou
  2016-02-03 14:56  5%   ` Max Linke
  0 siblings, 1 reply; 43+ results
From: Nicolas Goaziou @ 2016-01-31 22:06 UTC (permalink / raw)
  To: Matt Moriarity; +Cc: emacs-orgmode

Hello,

Matt Moriarity <mmoriarity@apple.com> writes:

> If I include a #+TITLE: directive at the top of my Org file, when I try
> to export it to HTML or markdown, I get an error:
>
>     apply: Wrong type argument: listp, #("Guide" 0 5 (:parent (#0)))
>
> Removing the #+TITLE seems to make everything ok. It seems like this
> should not be an issue, but I’m pretty new to org-mode.

I think this is due to a mixed Org installation: default Org from Emacs
probably interferes with ELPA's.

Regards,

-- 
Nicolas Goaziou

^ permalink raw reply	[relevance 0%]

* Re: Bug: Export breaks on documents with title [8.3.3 (8.3.3-26-ge92a06-elpaplus @ /Users/leafac/.emacs.d/elpa/org-plus-contrib-20160125/)]
  2016-01-27 19:23  5% Bug: Export breaks on documents with title [8.3.3 (8.3.3-26-ge92a06-elpaplus @ /Users/leafac/.emacs.d/elpa/org-plus-contrib-20160125/)] Leandro Facchinetti
@ 2016-01-28  0:14  0% ` Kyle Meyer
  0 siblings, 0 replies; 43+ results
From: Kyle Meyer @ 2016-01-28  0:14 UTC (permalink / raw)
  To: Leandro Facchinetti; +Cc: emacs-orgmode

Hello,

Leandro Facchinetti <me@leafac.com> writes:

[...]

> Trying to export a file with a `#+TITLE:' set leads to the error:
>
>     apply: Wrong type argument: listp, #("Writings" 0 8 (:parent (#0)))
>
> Sample file:
>
>     #+TITLE: Writings
>
> The error happens regardless of the export backend.
>
> I already ran `emacs -q' and the problem persists.

We've seen similar error due to issues with installation. For example,

  http://thread.gmane.org/gmane.emacs.bugs/110037/focus=103649

Please see if re-installing without the builtin Org loaded helps.

-- 
Kyle

^ permalink raw reply	[relevance 0%]

* Bug: Export breaks on documents with title [8.3.3 (8.3.3-26-ge92a06-elpaplus @ /Users/leafac/.emacs.d/elpa/org-plus-contrib-20160125/)]
@ 2016-01-27 19:23  5% Leandro Facchinetti
  2016-01-28  0:14  0% ` Kyle Meyer
  0 siblings, 1 reply; 43+ results
From: Leandro Facchinetti @ 2016-01-27 19:23 UTC (permalink / raw)
  To: emacs-orgmode

Hi, Org Mode contributors.

First, thanks for Org Mode. It changed my life!

I installed `org-plus-contrib' from `http://orgmode.org/elpa/' this
morning and got version `org-plus-contrib-20160125'.

Trying to export a file with a `#+TITLE:' set leads to the error:

    apply: Wrong type argument: listp, #("Writings" 0 8 (:parent (#0)))

Sample file:

    #+TITLE: Writings

The error happens regardless of the export backend.

I already ran `emacs -q' and the problem persists.

I appreciate any help debugging.

Emacs  : GNU Emacs 24.5.1 (x86_64-apple-darwin14.3.0, NS apple-appkit-1347.57)
 of 2015-05-29 on Leandros-MacBook-Air.local
Package: Org-mode version 8.3.3 (8.3.3-26-ge92a06-elpaplus @ /Users/leafac/.emacs.d/elpa/org-plus-contrib-20160125/)
-- 
Leandro Facchinetti <me@leafac.com>
https://www.leafac.com
GPG key: 3DF3D583

^ permalink raw reply	[relevance 5%]

* Bug: Cannot export document to HTML or Markdown if it has a title [8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)]
@ 2016-01-20  7:39  3% Matt Moriarity
  2016-01-31 22:06  0% ` Nicolas Goaziou
  0 siblings, 1 reply; 43+ results
From: Matt Moriarity @ 2016-01-20  7:39 UTC (permalink / raw)
  To: emacs-orgmode

If I include a #+TITLE: directive at the top of my Org file, when I try
to export it to HTML or markdown, I get an error:

    apply: Wrong type argument: listp, #("Guide" 0 5 (:parent (#0)))

Removing the #+TITLE seems to make everything ok. It seems like this
should not be an issue, but I’m pretty new to org-mode.

Emacs  : GNU Emacs 24.5.1 (x86_64-apple-darwin15.4.0, Carbon Version 157 AppKit 1404.41)
of 2016-01-16 on derrial.local
Package: Org-mode version 8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)

current state:
==============
(setq
org-id-locations-file "/Users/matt/.emacs.d/.cache/.org-id-locations"
org-export-backends '(md beamer latex html ascii)
org-tab-first-hook '(org-hide-block-toggle-maybe org-babel-hide-result-toggle-maybe
                      org-babel-header-arg-expand)
org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("article" "\\documentclass[11pt]{article}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
                      ("\\paragraph{%s}" . "\\paragraph*{%s}")
                      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
                     ("report" "\\documentclass[11pt]{report}" ("\\part{%s}" . "\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . "\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     )
org-clock-persist-file "/Users/matt/.emacs.d/.cache/org-clock-save.el"
org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
org-occur-hook '(org-first-headline-recenter)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-html-format-drawer-function '(lambda (name contents) 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-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-link-translation-function 'toc-org-unhrefify
org-present-mode-hook '(spacemacs//org-present-start)
org-agenda-restore-windows-after-quit t
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-capture-templates '(("ort/checkitem" "Org Repo Checklist Item" checkitem
                          (file+headline (ort/todo-file) "Checklist"))
                         ("ort/todo" "Org Repo Todo" entry
                          (file+headline (ort/todo-file) "Todos")
                          "* TODO  %?			%T\n %i\n Link: %l\n")
                         )
org-startup-indented t
org-after-todo-state-change-hook '(org-clock-out-if-current)
org-latex-format-drawer-function '(lambda (name contents) contents)
org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-babel-pre-tangle-hook '(save-buffer)
org-mode-hook '(#[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-show-block-all append local] 5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-babel-show-result-all append
                    local]
                   5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes
                 spacemacs/load-yasnippet toc-org-enable org-bullets-mode
                 spacemacs/add-org-surrounds evil-org-mode org-eldoc-load
                 spacemacs//init-company-org-mode company-mode)
org-archive-hook '(org-attach-archive-delete-maybe)
org-ascii-format-drawer-function '(lambda (name contents width) contents)
org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe)
org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                  org-cycle-show-empty-lines org-optimize-window-after-visibility-change)
org-present-mode-quit-hook '(spacemacs//org-present-end)
org-export-async-init-file "/Users/matt/.emacs.d/layers/org/org-async-init.el"
org-confirm-elisp-link-function 'yes-or-no-p
org-startup-with-inline-images t
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-html-format-headline-function 'org-html-format-headline-default-function
org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
org-fontify-whole-heading-line t
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
)

^ permalink raw reply	[relevance 3%]

* Re: Exporting a subtree
  2015-11-18 20:29  5% Exporting a subtree Peter Davis
  2015-11-18 20:35  0% ` John Hendy
@ 2015-11-20 16:21  0% ` Brett Viren
  1 sibling, 0 replies; 43+ results
From: Brett Viren @ 2015-11-20 16:21 UTC (permalink / raw)
  To: Peter Davis; +Cc: emacs-orgmode

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

Peter Davis <pfd@pfdstudio.com> writes:

> For the first time, I'm trying to export just a single subtree of my overall document, by typing
>
> C-c C-e C-s H O
>
> However, I get this error:
>
> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))

FWIW, I had this problem on my home machine about a week ago or so.  I
messed around with different versions of org and org-plus-contrib
installed from package-list-packages and eventually got it to go away.
Sorry I don't recall the specifics.  But I just wanted to say it's not
just you.

Right now, on my work system your test succeeds:

Org-mode version 8.2.10 (8.2.10-41-g42228a-elpa @ /home/bviren/.emacs.d/elpa/org-20150622/)

-Brett.

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 800 bytes --]

^ permalink raw reply	[relevance 0%]

* Re: Exporting a subtree
@ 2015-11-19 13:51  0% Peter Davis
  0 siblings, 0 replies; 43+ results
From: Peter Davis @ 2015-11-19 13:51 UTC (permalink / raw)
  To: Nick Dokos; +Cc: emacs-orgmode

Nick Dokos <ndokos@gmail.com> writes:

> John Hendy <jw.hendy@gmail.com> writes:
>
>> On Wed, Nov 18, 2015 at 2:29 PM, Peter Davis <pfd@pfdstudio.com> wrote:
>>>
>>> For the first time, I'm trying to export just a single subtree of my overall document, by typing
>>>
>>> C-c C-e C-s H O
>>>
>>> However, I get this error:
>>>
>>> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))
>>>
>>> The portion in quotes is the overall title of my document.
>>>
>>> Should this work? Is there something I need to do differently?
>>
>
> You should also provide a backtrace (with uncompiled code) if possible.
> See
>
>  (info "(org) Feedback")
>
> and, in particular, the subsection "How to create a useful backtrace".

Thanks very much, John and Nick. I didn't realize it was so easy to reload with uncompiled lisp. I tried this, but the export worked
with the uncompiled code! No error, so no debug backtrace.

Thanks,
-pd

^ permalink raw reply	[relevance 0%]

* Re: Exporting a subtree
@ 2015-11-19 13:32  0% Peter Davis
  0 siblings, 0 replies; 43+ results
From: Peter Davis @ 2015-11-19 13:32 UTC (permalink / raw)
  To: Nick Dokos; +Cc: emacs-orgmode

Nick Dokos <ndokos@gmail.com> writes:

> John Hendy <jw.hendy@gmail.com> writes:
>
>> On Wed, Nov 18, 2015 at 2:29 PM, Peter Davis <pfd@pfdstudio.com> wrote:
>>>
>>> For the first time, I'm trying to export just a single subtree of my overall document, by typing
>>>
>>> C-c C-e C-s H O
>>>
>>> However, I get this error:
>>>
>>> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))
>>>
>>> The portion in quotes is the overall title of my document.
>>>
>>> Should this work? Is there something I need to do differently?
>
> You should also provide a backtrace (with uncompiled code) if possible.
> See
>
>  (info "(org) Feedback")
>
> and, in particular, the subsection "How to create a useful backtrace".

Thanks for the tips. I was hoping this would be simple to answer. I don't really have hours of time to keep stopping and re-starting
emacs with uncompiled org-mode files, with minimal startup, etc. If I get a chance, I'll post the details. Meanwhile, I'll live
without this feature.

Thank you!

-pd

^ permalink raw reply	[relevance 0%]

* Re: Exporting a subtree
  2015-11-18 22:30  0% ` John Hendy
@ 2015-11-19  1:20  0%   ` Peter Davis
  0 siblings, 0 replies; 43+ results
From: Peter Davis @ 2015-11-19  1:20 UTC (permalink / raw)
  To: John Hendy; +Cc: emacs-orgmode

On Wed, Nov 18, 2015, at 05:30 PM, John Hendy wrote:
> On Wed, Nov 18, 2015 at 2:43 PM, Peter Davis <pfd@pfdstudio.com> wrote:
> > John Hendy <jw.hendy@gmail.com> writes:
> >
> >> On Wed, Nov 18, 2015 at 2:29 PM, Peter Davis <pfd@pfdstudio.com> wrote:
> >>>
> >>> For the first time, I'm trying to export just a single subtree of my overall document, by typing
> >>>
> >>> C-c C-e C-s H O
> >>>
> >>> However, I get this error:
> >>>
> >>> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))
> >>>
> >>> The portion in quotes is the overall title of my document.
> >>>
> >>> Should this work? Is there something I need to do differently?
> >>
> >> Would you kindly provide a minimal working example? Perhaps create a
> >> dummy tree and indicate an analogous subtree export target so that the
> >> list can try to reproduce. Perhaps someone will catch from the error
> >> what the problem is, but having something to try is extremely helpful.
> >> Since my subtree export works, I'm at a loss for how to diagnose why
> >> yours doesn't.
> >
> >
> > Thanks, John. I think the problem lies with the #+title: option. If it's present, as in the short example below, then I get the
> > error. If not, it seems to work ok.
> >
> > +------------test.org------
> > #+title: Here's a document title
> >
> > * NOTE h1
> >
> > * TODO h1 also
> >
> > ** NOTE h2
> >
> > * Another subtree
> >
> > Here's some stuff I want to export to HTML.
> >
> > +------------------------
> >
> 
> Is the attached what you'd expect? It works for me, and no issues with
> the title (which I don't think will apply since you're just exporting
> the subtree, but could be wrong).
> 
> 
> John
> 
> > Thanks,
> > -pd
> >
> Email had 1 attachment:
> + 2015-11-18_162910.png
>   33k (image/png)


That looks right, but, as I said, it doesn't work for me if the #+title:
option is included.

Thanks,

-- 
  Peter Davis
  www.techcurmudgeon.com
  www.timebums.com

^ permalink raw reply	[relevance 0%]

* Re: Exporting a subtree
  2015-11-18 20:43  0% Peter Davis
@ 2015-11-18 22:30  0% ` John Hendy
  2015-11-19  1:20  0%   ` Peter Davis
  0 siblings, 1 reply; 43+ results
From: John Hendy @ 2015-11-18 22:30 UTC (permalink / raw)
  To: Peter Davis; +Cc: emacs-orgmode

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

On Wed, Nov 18, 2015 at 2:43 PM, Peter Davis <pfd@pfdstudio.com> wrote:
> John Hendy <jw.hendy@gmail.com> writes:
>
>> On Wed, Nov 18, 2015 at 2:29 PM, Peter Davis <pfd@pfdstudio.com> wrote:
>>>
>>> For the first time, I'm trying to export just a single subtree of my overall document, by typing
>>>
>>> C-c C-e C-s H O
>>>
>>> However, I get this error:
>>>
>>> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))
>>>
>>> The portion in quotes is the overall title of my document.
>>>
>>> Should this work? Is there something I need to do differently?
>>
>> Would you kindly provide a minimal working example? Perhaps create a
>> dummy tree and indicate an analogous subtree export target so that the
>> list can try to reproduce. Perhaps someone will catch from the error
>> what the problem is, but having something to try is extremely helpful.
>> Since my subtree export works, I'm at a loss for how to diagnose why
>> yours doesn't.
>
>
> Thanks, John. I think the problem lies with the #+title: option. If it's present, as in the short example below, then I get the
> error. If not, it seems to work ok.
>
> +------------test.org------
> #+title: Here's a document title
>
> * NOTE h1
>
> * TODO h1 also
>
> ** NOTE h2
>
> * Another subtree
>
> Here's some stuff I want to export to HTML.
>
> +------------------------
>

Is the attached what you'd expect? It works for me, and no issues with
the title (which I don't think will apply since you're just exporting
the subtree, but could be wrong).


John

> Thanks,
> -pd
>

[-- Attachment #2: 2015-11-18_162910.png --]
[-- Type: image/png, Size: 24578 bytes --]

^ permalink raw reply	[relevance 0%]

* Re: Exporting a subtree
  2015-11-18 20:35  0% ` John Hendy
@ 2015-11-18 20:51  0%   ` Nick Dokos
  0 siblings, 0 replies; 43+ results
From: Nick Dokos @ 2015-11-18 20:51 UTC (permalink / raw)
  To: emacs-orgmode

John Hendy <jw.hendy@gmail.com> writes:

> On Wed, Nov 18, 2015 at 2:29 PM, Peter Davis <pfd@pfdstudio.com> wrote:
>>
>> For the first time, I'm trying to export just a single subtree of my overall document, by typing
>>
>> C-c C-e C-s H O
>>
>> However, I get this error:
>>
>> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))
>>
>> The portion in quotes is the overall title of my document.
>>
>> Should this work? Is there something I need to do differently?
>
> Would you kindly provide a minimal working example? Perhaps create a
> dummy tree and indicate an analogous subtree export target so that the
> list can try to reproduce. Perhaps someone will catch from the error
> what the problem is, but having something to try is extremely helpful.
> Since my subtree export works, I'm at a loss for how to diagnose why
> yours doesn't.
>
> Even better would be a minimal configuration file that also replicates
> your issue. In this way, users can replicate your exact setup with:
>
> - emacs -Q
> - M-x load-file RET ~/path/to/your/provided/min-config
> - navigate to subtree you've indicated
> - C-c C-e C-s H O
>
> Make sense? This should be standard for any error you encounter sent
> to the list, as a lot of these are likely going to come down to a
> nuance in your actual file, your emacs config, or possible an actual
> bug (in which case M-x org-version is also very helpful).
>
>

You should also provide a backtrace (with uncompiled code) if possible.
See

 (info "(org) Feedback")

and, in particular, the subsection "How to create a useful backtrace".

^ permalink raw reply	[relevance 0%]

* Re: Exporting a subtree
@ 2015-11-18 20:43  0% Peter Davis
  2015-11-18 22:30  0% ` John Hendy
  0 siblings, 1 reply; 43+ results
From: Peter Davis @ 2015-11-18 20:43 UTC (permalink / raw)
  To: John Hendy; +Cc: emacs-orgmode

John Hendy <jw.hendy@gmail.com> writes:

> On Wed, Nov 18, 2015 at 2:29 PM, Peter Davis <pfd@pfdstudio.com> wrote:
>>
>> For the first time, I'm trying to export just a single subtree of my overall document, by typing
>>
>> C-c C-e C-s H O
>>
>> However, I get this error:
>>
>> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))
>>
>> The portion in quotes is the overall title of my document.
>>
>> Should this work? Is there something I need to do differently?
>
> Would you kindly provide a minimal working example? Perhaps create a
> dummy tree and indicate an analogous subtree export target so that the
> list can try to reproduce. Perhaps someone will catch from the error
> what the problem is, but having something to try is extremely helpful.
> Since my subtree export works, I'm at a loss for how to diagnose why
> yours doesn't.


Thanks, John. I think the problem lies with the #+title: option. If it's present, as in the short example below, then I get the
error. If not, it seems to work ok.

+------------test.org------
#+title: Here's a document title

* NOTE h1

* TODO h1 also

** NOTE h2

* Another subtree

Here's some stuff I want to export to HTML.

+------------------------

Thanks,
-pd

^ permalink raw reply	[relevance 0%]

* Re: Exporting a subtree
  2015-11-18 20:29  5% Exporting a subtree Peter Davis
@ 2015-11-18 20:35  0% ` John Hendy
  2015-11-18 20:51  0%   ` Nick Dokos
  2015-11-20 16:21  0% ` Brett Viren
  1 sibling, 1 reply; 43+ results
From: John Hendy @ 2015-11-18 20:35 UTC (permalink / raw)
  To: Peter Davis; +Cc: emacs-orgmode

On Wed, Nov 18, 2015 at 2:29 PM, Peter Davis <pfd@pfdstudio.com> wrote:
>
> For the first time, I'm trying to export just a single subtree of my overall document, by typing
>
> C-c C-e C-s H O
>
> However, I get this error:
>
> apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))
>
> The portion in quotes is the overall title of my document.
>
> Should this work? Is there something I need to do differently?

Would you kindly provide a minimal working example? Perhaps create a
dummy tree and indicate an analogous subtree export target so that the
list can try to reproduce. Perhaps someone will catch from the error
what the problem is, but having something to try is extremely helpful.
Since my subtree export works, I'm at a loss for how to diagnose why
yours doesn't.

Even better would be a minimal configuration file that also replicates
your issue. In this way, users can replicate your exact setup with:

- emacs -Q
- M-x load-file RET ~/path/to/your/provided/min-config
- navigate to subtree you've indicated
- C-c C-e C-s H O

Make sense? This should be standard for any error you encounter sent
to the list, as a lot of these are likely going to come down to a
nuance in your actual file, your emacs config, or possible an actual
bug (in which case M-x org-version is also very helpful).


Thanks,
John

>
> Thank you!
>
> -pd
>
>

^ permalink raw reply	[relevance 0%]

* Exporting a subtree
@ 2015-11-18 20:29  5% Peter Davis
  2015-11-18 20:35  0% ` John Hendy
  2015-11-20 16:21  0% ` Brett Viren
  0 siblings, 2 replies; 43+ results
From: Peter Davis @ 2015-11-18 20:29 UTC (permalink / raw)
  To: emacs-orgmode


For the first time, I'm trying to export just a single subtree of my overall document, by typing

C-c C-e C-s H O

However, I get this error:

apply: Wrong type argument: listp, #("Details, November 2015" 0 22 (:parent (#0)))

The portion in quotes is the overall title of my document.

Should this work? Is there something I need to do differently?

Thank you!

-pd

^ permalink raw reply	[relevance 5%]

* Re: Bug: Export fails with a type error [8.3.2 (8.3.2-10-g00dacd-elpa @ /Users/hedman/.emacs.d/elpa/org-20151005/)]
  2015-11-03 10:19  3% Bug: Export fails with a type error [8.3.2 (8.3.2-10-g00dacd-elpa @ /Users/hedman/.emacs.d/elpa/org-20151005/)] Noruna AB c/o Hedman
@ 2015-11-03 10:49  0% ` Noruna AB c/o Hedman
  0 siblings, 0 replies; 43+ results
From: Noruna AB c/o Hedman @ 2015-11-03 10:49 UTC (permalink / raw)
  To: emacs-orgmode

Downloading and recompiling again fixed this problem.  Close this.

/F

3 nov 2015 kl. 11:19 skrev Noruna AB c/o Hedman <fredrik.hedman@me.com>:

> When exporting an org-documnent that has worked before I get the
> following error
> 
>   apply: Wrong type argument: listp, #("Post-it lappar från workshop" 0 28 (:parent (#0))).
> 
> It seems that it is the header of the file that is causing problems.
> The error started to occur after upgrading.  
> 
> Removing the TITLE and AUTHOR removes the error:
> 
> #+LATEX_CLASS: report
> #+LATEX_CLASS_OPTIONS: [a4paper,pdftex]
> 
> #+AUTHOR: Fredrik B. Hedman
> #+TITLE: Post-it lappar från workshop
> 
> Cheers,
> /F
> 
> 
> 
> 
> ------------------------------------------------------------------------
> 
> 
> 
> Emacs  : GNU Emacs 24.5.1 (x86_64-apple-darwin13.4.0, NS apple-appkit-1265.21)
> of 2015-04-10 on builder10-9.porkrind.org
> Package: Org-mode version 8.3.2 (8.3.2-10-g00dacd-elpa @ /Users/hedman/.emacs.d/elpa/org-20151005/)
> 
> current state:
> ==============
> (setq
> org-export-backends '(ascii beamer html icalendar latex man md odt org)
> org-tab-first-hook '(org-hide-block-toggle-maybe
>                      org-babel-hide-result-toggle-maybe
>                      org-babel-header-arg-expand)
> org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}"
>                      ("\\section{%s}" . "\\section*{%s}")
>                      ("\\subsection{%s}" . "\\subsection*{%s}")
>                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
>                     ("article" "\\documentclass[11pt]{article}"
>                      ("\\section{%s}" . "\\section*{%s}")
>                      ("\\subsection{%s}" . "\\subsection*{%s}")
>                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
>                      ("\\paragraph{%s}" . "\\paragraph*{%s}")
>                      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
>                     ("report" "\\documentclass[11pt]{report}"
>                      ("\\chapter{%s}" . "\\chapter*{%s}")
>                      ("\\section{%s}" . "\\section*{%s}")
>                      ("\\subsection{%s}" . "\\subsection*{%s}")
>                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
>                     ("book" "\\documentclass[11pt]{book}"
>                      ("\\part{%s}" . "\\part*{%s}")
>                      ("\\chapter{%s}" . "\\chapter*{%s}")
>                      ("\\section{%s}" . "\\section*{%s}")
>                      ("\\subsection{%s}" . "\\subsection*{%s}")
>                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
>                     )
> org-latex-default-packages-alist '(("AUTO" "inputenc" t) ("T1" "fontenc" t)
>                                    ("" "longtable" nil) ("" "float" nil)
>                                    ("" "wrapfig" nil) ("normalem" "ulem" t)
>                                    ("" "amsmath" t) ("" "textcomp" t)
>                                    ("" "marvosym" t) ("" "hyperref" t)
>                                    ("" "amssymb" t) "\\tolerance=1000")
> org-speed-command-hook '(org-speed-command-default-hook
>                          org-babel-speed-command-hook)
> org-occur-hook '(org-first-headline-recenter)
> org-metaup-hook '(org-babel-load-in-session-maybe)
> org-html-format-drawer-function '(lambda (name contents) contents)
> org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
> org-confirm-shell-link-function 'yes-or-no-p
> org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
> org-latex-format-headline-function 'org-latex-format-headline-default-function
> org-after-todo-state-change-hook '(org-clock-out-if-current)
> org-latex-format-drawer-function '(lambda (name contents) contents)
> org-odt-format-headline-function 'org-odt-format-headline-default-function
> org-from-is-user-regexp "\\<Fredrik Hedman\\>"
> org-src-mode-hook '(org-src-babel-configure-edit-buffer
>                     org-src-mode-configure-edit-buffer)
> org-agenda-before-write-hook '(org-agenda-add-entry-text)
> org-babel-pre-tangle-hook '(save-buffer)
> org-mode-hook '(turn-on-auto-fill
>                 #[nil "\300\301\302\303\304$\207"
>                   [org-add-hook change-major-mode-hook org-show-block-all
>                    append local]
>                   5]
>                 #[nil "\300\301\302\303\304$\207"
>                   [org-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-archive-hook '(org-attach-archive-delete-maybe)
> org-ascii-format-drawer-function '(lambda (name contents width) contents)
> org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
> org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
>                          org-babel-execute-safely-maybe)
> org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
>                  org-cycle-show-empty-lines
>                  org-optimize-window-after-visibility-change)
> org-footnote-define-inline t
> org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el")
>                              ("elisp" . "el"))
> org-confirm-elisp-link-function 'yes-or-no-p
> org-metadown-hook '(org-babel-pop-to-session-maybe)
> org-odt-format-drawer-function '(lambda (name contents) contents)
> org-html-format-headline-function 'org-html-format-headline-default-function
> org-completion-use-ido t
> org-indirect-buffer-display 'current-window
> org-babel-load-languages '((python . t))
> org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
> org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
> )
> 

^ permalink raw reply	[relevance 0%]

* Bug: Export fails with a type error [8.3.2 (8.3.2-10-g00dacd-elpa @ /Users/hedman/.emacs.d/elpa/org-20151005/)]
@ 2015-11-03 10:19  3% Noruna AB c/o Hedman
  2015-11-03 10:49  0% ` Noruna AB c/o Hedman
  0 siblings, 1 reply; 43+ results
From: Noruna AB c/o Hedman @ 2015-11-03 10:19 UTC (permalink / raw)
  To: emacs-orgmode

When exporting an org-documnent that has worked before I get the
following error

   apply: Wrong type argument: listp, #("Post-it lappar från workshop" 0 28 (:parent (#0))).

It seems that it is the header of the file that is causing problems.
The error started to occur after upgrading.  

Removing the TITLE and AUTHOR removes the error:

#+LATEX_CLASS: report
#+LATEX_CLASS_OPTIONS: [a4paper,pdftex]

#+AUTHOR: Fredrik B. Hedman
#+TITLE: Post-it lappar från workshop

Cheers,
/F




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



Emacs  : GNU Emacs 24.5.1 (x86_64-apple-darwin13.4.0, NS apple-appkit-1265.21)
 of 2015-04-10 on builder10-9.porkrind.org
Package: Org-mode version 8.3.2 (8.3.2-10-g00dacd-elpa @ /Users/hedman/.emacs.d/elpa/org-20151005/)

current state:
==============
(setq
 org-export-backends '(ascii beamer html icalendar latex man md odt org)
 org-tab-first-hook '(org-hide-block-toggle-maybe
                      org-babel-hide-result-toggle-maybe
                      org-babel-header-arg-expand)
 org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("article" "\\documentclass[11pt]{article}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
                      ("\\paragraph{%s}" . "\\paragraph*{%s}")
                      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
                     ("report" "\\documentclass[11pt]{report}"
                      ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("book" "\\documentclass[11pt]{book}"
                      ("\\part{%s}" . "\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     )
 org-latex-default-packages-alist '(("AUTO" "inputenc" t) ("T1" "fontenc" t)
                                    ("" "longtable" nil) ("" "float" nil)
                                    ("" "wrapfig" nil) ("normalem" "ulem" t)
                                    ("" "amsmath" t) ("" "textcomp" t)
                                    ("" "marvosym" t) ("" "hyperref" t)
                                    ("" "amssymb" t) "\\tolerance=1000")
 org-speed-command-hook '(org-speed-command-default-hook
                          org-babel-speed-command-hook)
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-html-format-drawer-function '(lambda (name contents) contents)
 org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-latex-format-drawer-function '(lambda (name contents) contents)
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-from-is-user-regexp "\\<Fredrik Hedman\\>"
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
                     org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(turn-on-auto-fill
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-show-block-all
                    append local]
                   5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-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-archive-hook '(org-attach-archive-delete-maybe)
 org-ascii-format-drawer-function '(lambda (name contents width) contents)
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
                          org-babel-execute-safely-maybe)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                  org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-footnote-define-inline t
 org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el")
                              ("elisp" . "el"))
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-odt-format-drawer-function '(lambda (name contents) contents)
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-completion-use-ido t
 org-indirect-buffer-display 'current-window
 org-babel-load-languages '((python . t))
 org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 )

^ permalink raw reply	[relevance 3%]

* Re: Can't email multipart/alternative anymore
@ 2015-10-28 15:23  3% Peter Davis
  0 siblings, 0 replies; 43+ results
From: Peter Davis @ 2015-10-28 15:23 UTC (permalink / raw)
  To: emacs-orgmode

Aaron Ecay <aaronecay@gmail.com> writes:

>
> As Nicolas said, it would be good to know if upgrading org fixes the
> issue that you see.

I just tried updated via the list-packages, but ...

1) org-version now says 8.3.2 (formerly 8.2.10)

2) I now get this error:

Making completion list...
Quit
Mark set [2 times]
org-babel-exp process dot at line 9...
executing Dot code block...
Wrote /var/folders/d4/xb7t0gbd0f97p6494kz5xzdnmlncz8/T/babel-27532hcO/ob-input-27532inY
Code block evaluation complete.
apply: Wrong type argument: listp, #("Org Mime Org Buffer HTMLize test" 0 32 (:parent (#0)))

3) The stackdump for this:

Debugger entered--Lisp error: (wrong-type-argument listp #("Org Mime Org Buffer HTMLize test" 0 32 (:parent (#1))))
  org-element-set-contents(#("Org Mime Org Buffer HTMLize test" 0 32 (:parent (#0))))
  apply(org-element-set-contents #("Org Mime Org Buffer HTMLize test" 0 32 (:parent (#0))) nil)
  #[(s) "\b\306\307\310\b#\x1a\311\312	\211:\204\0\313\202\"\v@9\203!\vAA\202\"\v)\"\210\314\315\n	\211:\2043\313\202@\v@9\203?\vAA\202@\v)#\210	\316\211\n\x1c\v;\203V\317\320\f\v#\202\\\321\vA@\f\"*\x1c\211;\203n\322\v\313\f
$\202z\vA\323\vA@\f
#\240\210\v+\210\nA	A@\240\210\n	@\240*\207" [s new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\b\305	^[\211;\203\0\306\f\307\v\n$\202 \fA\310\fA@\v\n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 6](#("Org Mime Org Buffer HTMLize test" 0 32 (:parent (#0))))
  #[(--data) "\b\211:\204\0	;\205\0\306\202\0	@9\205\0	@)\b?\206\337\v\203,\b\307\v\310\">\206\337\n\2047\311\f\b\"\202\337\n\312=\203\\\311\f\b\211:\204J\313\202W	@9\203V	AA\202W	)\"\202\337\n
>\203\202\x0e\b!\211\x15\203\201\x0e\203z\314\315\x15\"\210\202\201\x0e\x0eB\x17)\x18\316=\203\312\b;\204\312\n\x19\236A\313\x1a\211^[\203\311\x0e@\x1a\f\x1a\b\x1e	;\203\266\317\320\x1c	#\202\275\307	A@\x1c\"*!\210^[A\211^[\204\234*\x1d\203\202\x0e\316=\203\202\n\x1e>\203\202\x0e\x1f\313 \211^[\203\201\x0e@\211 @ A\b\x1e	;\203\x01\317\320\x1c	#\202\v\307	A@\x1c\"*!\"!\203w\x0e\"#\235\203_\x0e\"$\235\203P\321!!\313%\211^[\203L\x0e@%\f%A!\210\f%@!\210^[A\211^[\2042*\202w\f!A!\210\f!@!\210\202w\x0e\"$\235\203r\311\f\321!!\"\210\202w\f!!\210*^[A\211^[\204\350*\n&>\206\337\b\211:\204\224\313\202\241	@9\203\240	AA\202\241	)?\206\337\x0e\322=\203\265\n'>?\206\337\x0e\323=\203\303\n(>\206\337\311\f\b\211:\204\320\313\202\335	@9\203\334	AA\202\335	)\")\207" [--data element --type info --walk-tree types plain-text plist-get :ignore-list mapc org-data nil throw --map-first-match objects get-text-property 0 reverse greater-elements elements fun result first-match --acc --category org-element-secondary-value-alist p --dolist-tail-- property with-affiliated org-element-all-elements org-element--parsed-properties-alist kwd-pair value kwd org-element-dual-keywords org-element-multiple-keywords line no-recursion org-element-greater-elements org-element-all-objects] 6](#("Org Mime Org Buffer HTMLize test" 0 32 (:parent (#0))))
  mapc(#[(--data) "\b\211:\204\0	;\205\0\306\202\0	@9\205\0	@)\b?\206\337\v\203,\b\307\v\310\">\206\337\n\2047\311\f\b\"\202\337\n\312=\203\\\311\f\b\211:\204J\313\202W	@9\203V	AA\202W	)\"\202\337\n
>\203\202\x0e\b!\211\x15\203\201\x0e\203z\314\315\x15\"\210\202\201\x0e\x0eB\x17)\x18\316=\203\312\b;\204\312\n\x19\236A\313\x1a\211^[\203\311\x0e@\x1a\f\x1a\b\x1e	;\203\266\317\320\x1c	#\202\275\307	A@\x1c\"*!\210^[A\211^[\204\234*\x1d\203\202\x0e\316=\203\202\n\x1e>\203\202\x0e\x1f\313 \211^[\203\201\x0e@\211 @ A\b\x1e	;\203\x01\317\320\x1c	#\202\v\307	A@\x1c\"*!\"!\203w\x0e\"#\235\203_\x0e\"$\235\203P\321!!\313%\211^[\203L\x0e@%\f%A!\210\f%@!\210^[A\211^[\2042*\202w\f!A!\210\f!@!\210\202w\x0e\"$\235\203r\311\f\321!!\"\210\202w\f!!\210*^[A\211^[\204\350*\n&>\206\337\b\211:\204\224\313\202\241	@9\203\240	AA\202\241	)?\206\337\x0e\322=\203\265\n'>?\206\337\x0e\323=\203\303\n(>\206\337\311\f\b\211:\204\320\313\202\335	@9\203\334	AA\202\335	)\")\207" [--data element --type info --walk-tree types plain-text plist-get :ignore-list mapc org-data nil throw --map-first-match objects get-text-property 0 reverse greater-elements elements fun result first-match --acc --category org-element-secondary-value-alist p --dolist-tail-- property with-affiliated org-element-all-elements org-element--parsed-properties-alist kwd-pair value kwd org-element-dual-keywords org-element-multiple-keywords line no-recursion org-element-greater-elements org-element-all-objects] 6] (#("Org Mime Org Buffer HTMLize test" 0 32 (:parent #0))))
  #[(--data) "\b\211:\204\0	;\205\0\306\202\0	@9\205\0	@)\b?\206\337\v\203,\b\307\v\310\">\206\337\n\2047\311\f\b\"\202\337\n\312=\203\\\311\f\b\211:\204J\313\202W	@9\203V	AA\202W	)\"\202\337\n
>\203\202\x0e\b!\211\x15\203\201\x0e\203z\314\315\x15\"\210\202\201\x0e\x0eB\x17)\x18\316=\203\312\b;\204\312\n\x19\236A\313\x1a\211^[\203\311\x0e@\x1a\f\x1a\b\x1e	;\203\266\317\320\x1c	#\202\275\307	A@\x1c\"*!\210^[A\211^[\204\234*\x1d\203\202\x0e\316=\203\202\n\x1e>\203\202\x0e\x1f\313 \211^[\203\201\x0e@\211 @ A\b\x1e	;\203\x01\317\320\x1c	#\202\v\307	A@\x1c\"*!\"!\203w\x0e\"#\235\203_\x0e\"$\235\203P\321!!\313%\211^[\203L\x0e@%\f%A!\210\f%@!\210^[A\211^[\2042*\202w\f!A!\210\f!@!\210\202w\x0e\"$\235\203r\311\f\321!!\"\210\202w\f!!\210*^[A\211^[\204\350*\n&>\206\337\b\211:\204\224\313\202\241	@9\203\240	AA\202\241	)?\206\337\x0e\322=\203\265\n'>?\206\337\x0e\323=\203\303\n(>\206\337\311\f\b\211:\204\320\313\202\335	@9\203\334	AA\202\335	)\")\207" [--data element --type info --walk-tree types plain-text plist-get :ignore-list mapc org-data nil throw --map-first-match objects get-text-property 0 reverse greater-elements elements fun result first-match --acc --category org-element-secondary-value-alist p --dolist-tail-- property with-affiliated org-element-all-elements org-element--parsed-properties-alist kwd-pair value kwd org-element-dual-keywords org-element-multiple-keywords line no-recursion org-element-greater-elements org-element-all-objects] 6]((#("Org Mime Org Buffer HTMLize test" 0 32 (:parent #0))))
  byte-code("\b	!\210\n\237\207" [--walk-tree data --acc] 2)
  org-element-map((#("Org Mime Org Buffer HTMLize test" 0 32 (:parent #0))) plain-text #[(s) "\b\306\307\310\b#\x1a\311\312	\211:\204\0\313\202\"\v@9\203!\vAA\202\"\v)\"\210\314\315\n	\211:\2043\313\202@\v@9\203?\vAA\202@\v)#\210	\316\211\n\x1c\v;\203V\317\320\f\v#\202\\\321\vA@\f\"*\x1c\211;\203n\322\v\313\f
$\202z\vA\323\vA@\f
#\240\210\v+\210\nA	A@\240\210\n	@\240*\207" [s new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\b\305	^[\211;\203\0\306\f\307\v\n$\202 \fA\310\fA@\v\n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 6])
  org-export--get-inbuffer-options([cl-struct-org-export-backend html nil ((bold . org-html-bold) (center-block . org-html-center-block) (clock . org-html-clock) (code . org-html-code) (drawer . org-html-drawer) (dynamic-block . org-html-dynamic-block) (entity . org-html-entity) (example-block . org-html-example-block) (export-block . org-html-export-block) (export-snippet . org-html-export-snippet) (fixed-width . org-html-fixed-width) (footnote-definition . org-html-footnote-definition) (footnote-reference . org-html-footnote-reference) (headline . org-html-headline) (horizontal-rule . org-html-horizontal-rule) (inline-src-block . org-html-inline-src-block) (inlinetask . org-html-inlinetask) (inner-template . org-html-inner-template) (italic . org-html-italic) (item . org-html-item) (keyword . org-html-keyword) (latex-environment . org-html-latex-environment) (latex-fragment . org-html-latex-fragment) (line-break . org-html-line-break) (link . org-html-link) (node-property . org-html-node-property) (paragraph . org-html-paragraph) (plain-list . org-html-plain-list) (plain-text . org-html-plain-text) (planning . org-html-planning) (property-drawer . org-html-property-drawer) (quote-block . org-html-quote-block) (radio-target . org-html-radio-target) (section . org-html-section) (special-block . org-html-special-block) (src-block . org-html-src-block) (statistics-cookie . org-html-statistics-cookie) (strike-through . org-html-strike-through) (subscript . org-html-subscript) (superscript . org-html-superscript) (table . org-html-table) (table-cell . org-html-table-cell) (table-row . org-html-table-row) (target . org-html-target) (template . org-html-template) (timestamp . org-html-timestamp) (underline . org-html-underline) (verbatim . org-html-verbatim) (verse-block . org-html-verse-block)) ((:html-doctype "HTML_DOCTYPE" nil org-html-doctype) (:html-container "HTML_CONTAINER" nil org-html-container-element) (:description "DESCRIPTION" nil nil newline) (:keywords "KEYWORDS" nil nil space) (:html-html5-fancy nil "html5-fancy" org-html-html5-fancy) (:html-link-use-abs-url nil "html-link-use-abs-url" org-html-link-use-abs-url) (:html-link-home "HTML_LINK_HOME" nil org-html-link-home) (:html-link-up "HTML_LINK_UP" nil org-html-link-up) (:html-mathjax "HTML_MATHJAX" nil "" space) (:html-link-use-abs-url nil "html-link-use-abs-url" org-html-link-use-abs-url) (:html-postamble nil "html-postamble" org-html-postamble) (:html-preamble nil "html-preamble" org-html-preamble) (:html-head "HTML_HEAD" nil org-html-head newline) (:html-head-extra "HTML_HEAD_EXTRA" nil org-html-head-extra newline) (:subtitle "SUBTITLE" nil nil parse) (:html-head-include-default-style nil "html-style" org-html-head-include-default-style) (:html-head-include-scripts nil "html-scripts" org-html-head-include-scripts) (:html-allow-name-attribute-in-anchors nil nil org-html-allow-name-attribute-in-anchors) (:html-divs nil nil org-html-divs) (:html-checkbox-type nil nil org-html-checkbox-type) (:html-extension nil nil org-html-extension) (:html-footnote-format nil nil org-html-footnote-format) (:html-footnote-separator nil nil org-html-footnote-separator) (:html-footnotes-section nil nil org-html-footnotes-section) (:html-format-drawer-function nil nil org-html-format-drawer-function) (:html-format-headline-function nil nil org-html-format-headline-function) (:html-format-inlinetask-function nil nil org-html-format-inlinetask-function) (:html-home/up-format nil nil org-html-home/up-format) (:html-indent nil nil org-html-indent) (:html-infojs-options nil nil org-html-infojs-options) (:html-infojs-template nil nil org-html-infojs-template) (:html-inline-image-rules nil nil org-html-inline-image-rules) (:html-link-org-files-as-html nil nil org-html-link-org-files-as-html) (:html-mathjax-options nil nil org-html-mathjax-options) (:html-mathjax-template nil nil org-html-mathjax-template) (:html-metadata-timestamp-format nil nil org-html-metadata-timestamp-format) (:html-postamble-format nil nil org-html-postamble-format) (:html-preamble-format nil nil org-html-preamble-format) (:html-table-align-individual-fields nil nil org-html-table-align-individual-fields) (:html-table-caption-above nil nil org-html-table-caption-above) (:html-table-data-tags nil nil org-html-table-data-tags) (:html-table-header-tags nil nil org-html-table-header-tags) (:html-table-use-header-tags-for-first-column nil nil org-html-table-use-header-tags-for-first-column) (:html-tag-class-prefix nil nil org-html-tag-class-prefix) (:html-text-markup-alist nil nil org-html-text-markup-alist) (:html-todo-kwd-class-prefix nil nil org-html-todo-kwd-class-prefix) (:html-toplevel-hlevel nil nil org-html-toplevel-hlevel) (:html-use-infojs nil nil org-html-use-infojs) (:html-validation-link nil nil org-html-validation-link) (:html-viewport nil nil org-html-viewport) ...) ((:filter-options . org-html-infojs-install-script) (:filter-final-output . org-html-final-function)) ("HTML") (104 "Export to HTML" ((72 "As HTML buffer" org-html-export-as-html) (104 "As HTML file" org-html-export-to-html) (111 "As HTML file and open" (lambda (a s v b) (if a (org-html-export-to-html t s v b) (org-open-file (org-html-export-to-html nil s v b)))))))])
  org-export-get-environment([cl-struct-org-export-backend html nil ((bold . org-html-bold) (center-block . org-html-center-block) (clock . org-html-clock) (code . org-html-code) (drawer . org-html-drawer) (dynamic-block . org-html-dynamic-block) (entity . org-html-entity) (example-block . org-html-example-block) (export-block . org-html-export-block) (export-snippet . org-html-export-snippet) (fixed-width . org-html-fixed-width) (footnote-definition . org-html-footnote-definition) (footnote-reference . org-html-footnote-reference) (headline . org-html-headline) (horizontal-rule . org-html-horizontal-rule) (inline-src-block . org-html-inline-src-block) (inlinetask . org-html-inlinetask) (inner-template . org-html-inner-template) (italic . org-html-italic) (item . org-html-item) (keyword . org-html-keyword) (latex-environment . org-html-latex-environment) (latex-fragment . org-html-latex-fragment) (line-break . org-html-line-break) (link . org-html-link) (node-property . org-html-node-property) (paragraph . org-html-paragraph) (plain-list . org-html-plain-list) (plain-text . org-html-plain-text) (planning . org-html-planning) (property-drawer . org-html-property-drawer) (quote-block . org-html-quote-block) (radio-target . org-html-radio-target) (section . org-html-section) (special-block . org-html-special-block) (src-block . org-html-src-block) (statistics-cookie . org-html-statistics-cookie) (strike-through . org-html-strike-through) (subscript . org-html-subscript) (superscript . org-html-superscript) (table . org-html-table) (table-cell . org-html-table-cell) (table-row . org-html-table-row) (target . org-html-target) (template . org-html-template) (timestamp . org-html-timestamp) (underline . org-html-underline) (verbatim . org-html-verbatim) (verse-block . org-html-verse-block)) ((:html-doctype "HTML_DOCTYPE" nil org-html-doctype) (:html-container "HTML_CONTAINER" nil org-html-container-element) (:description "DESCRIPTION" nil nil newline) (:keywords "KEYWORDS" nil nil space) (:html-html5-fancy nil "html5-fancy" org-html-html5-fancy) (:html-link-use-abs-url nil "html-link-use-abs-url" org-html-link-use-abs-url) (:html-link-home "HTML_LINK_HOME" nil org-html-link-home) (:html-link-up "HTML_LINK_UP" nil org-html-link-up) (:html-mathjax "HTML_MATHJAX" nil "" space) (:html-link-use-abs-url nil "html-link-use-abs-url" org-html-link-use-abs-url) (:html-postamble nil "html-postamble" org-html-postamble) (:html-preamble nil "html-preamble" org-html-preamble) (:html-head "HTML_HEAD" nil org-html-head newline) (:html-head-extra "HTML_HEAD_EXTRA" nil org-html-head-extra newline) (:subtitle "SUBTITLE" nil nil parse) (:html-head-include-default-style nil "html-style" org-html-head-include-default-style) (:html-head-include-scripts nil "html-scripts" org-html-head-include-scripts) (:html-allow-name-attribute-in-anchors nil nil org-html-allow-name-attribute-in-anchors) (:html-divs nil nil org-html-divs) (:html-checkbox-type nil nil org-html-checkbox-type) (:html-extension nil nil org-html-extension) (:html-footnote-format nil nil org-html-footnote-format) (:html-footnote-separator nil nil org-html-footnote-separator) (:html-footnotes-section nil nil org-html-footnotes-section) (:html-format-drawer-function nil nil org-html-format-drawer-function) (:html-format-headline-function nil nil org-html-format-headline-function) (:html-format-inlinetask-function nil nil org-html-format-inlinetask-function) (:html-home/up-format nil nil org-html-home/up-format) (:html-indent nil nil org-html-indent) (:html-infojs-options nil nil org-html-infojs-options) (:html-infojs-template nil nil org-html-infojs-template) (:html-inline-image-rules nil nil org-html-inline-image-rules) (:html-link-org-files-as-html nil nil org-html-link-org-files-as-html) (:html-mathjax-options nil nil org-html-mathjax-options) (:html-mathjax-template nil nil org-html-mathjax-template) (:html-metadata-timestamp-format nil nil org-html-metadata-timestamp-format) (:html-postamble-format nil nil org-html-postamble-format) (:html-preamble-format nil nil org-html-preamble-format) (:html-table-align-individual-fields nil nil org-html-table-align-individual-fields) (:html-table-caption-above nil nil org-html-table-caption-above) (:html-table-data-tags nil nil org-html-table-data-tags) (:html-table-header-tags nil nil org-html-table-header-tags) (:html-table-use-header-tags-for-first-column nil nil org-html-table-use-header-tags-for-first-column) (:html-tag-class-prefix nil nil org-html-tag-class-prefix) (:html-text-markup-alist nil nil org-html-text-markup-alist) (:html-todo-kwd-class-prefix nil nil org-html-todo-kwd-class-prefix) (:html-toplevel-hlevel nil nil org-html-toplevel-hlevel) (:html-use-infojs nil nil org-html-use-infojs) (:html-validation-link nil nil org-html-validation-link) (:html-viewport nil nil org-html-viewport) ...) ((:filter-options . org-html-infojs-install-script) (:filter-final-output . org-html-final-function)) ("HTML") (104 "Export to HTML" ((72 "As HTML buffer" org-html-export-as-html) (104 "As HTML file" org-html-export-to-html) (111 "As HTML file and open" (lambda (a s v b) (if a (org-html-export-to-html t s v b) (org-open-file (org-html-export-to-html nil s v b)))))))] nil nil)
  org-export-as(html nil nil t nil)
  org-export-string-as(#("#+STARTUP: showeverything logdone\n#+options: toc:nil num:nil\n#+title: Org Mime Org Buffer HTMLize test\n\n* Intro\n\nHere's a simple graph:\n\n#+BEGIN_SRC dot :file org-test.png :cmdline -Kdot -Tpng\ndigraph G {\n  rankdir=LR;\n  node [shape=box];\n  A -> B;\n  B -> C;\n  C -> A;\n}\n#+END_SRC\n\nWill org-mime-org-buffer-htmlize automatically include the image?\n\n" 0 33 (fontified t font-lock-fontified t face org-meta-line) 33 34 (fontified t) 34 60 (fontified t font-lock-fontified t face org-meta-line) 60 61 (fontified t) 61 69 (fontified t font-lock-fontified t face org-document-info-keyword) 69 70 (fontified t) 70 103 (fontified t font-lock-fontified t face org-document-title) 103 104 (fontified t) 104 106 (fontified t face org-level-1) 106 111 (fontified t face org-level-1) 111 137 (fontified t) 137 192 (fontified t font-lock-fontified t font-lock-multiline t face org-block-begin-line) 192 193 (fontified t font-lock-fontified t font-lock-multiline t face org-block-begin-line) 193 270 (fontified t font-lock-fontified t font-lock-multiline t src-block t) 270 271 (fontified t font-lock-fontified t font-lock-multiline t src-block t) 271 280 (fontified t font-lock-fontified t font-lock-multiline t face org-block-end-line) 280 281 (fontified t face org-block-end-line) 281 282 (fontified t) 282 349 (fontified t)) html t)
  (org-mime-replace-images (org-export-string-as (funcall bhook body (quote html)) (quote html) t) file)
  (let* ((org-link-file-path-type (quote absolute)) (org-export-htmlize-output-type (quote inline-css)) (html-and-images (org-mime-replace-images (org-export-string-as (funcall bhook body (quote html)) (quote html) t) file)) (images (cdr html-and-images)) (html (org-mime-apply-html-hook (car html-and-images)))) (insert (org-mime-multipart (org-export-string-as (org-babel-trim (funcall bhook body (if (eq fmt ...) (quote org) (quote ascii)))) (if (eq fmt (quote html)) (quote org) (quote ascii)) t) html) (mapconcat (quote identity) images "\n")))
  (cond ((eq fmt (quote org)) (require (quote ox-org)) (insert (org-export-string-as (org-babel-trim (funcall bhook body (quote org))) (quote org) t))) ((eq fmt (quote ascii)) (require (quote ox-ascii)) (insert (org-export-string-as (concat "#+Title:\n" (funcall bhook body (quote ascii))) (quote ascii) t))) ((or (eq fmt (quote html)) (eq fmt (quote html-ascii))) (require (quote ox-ascii)) (require (quote ox-org)) (let* ((org-link-file-path-type (quote absolute)) (org-export-htmlize-output-type (quote inline-css)) (html-and-images (org-mime-replace-images (org-export-string-as (funcall bhook body ...) (quote html) t) file)) (images (cdr html-and-images)) (html (org-mime-apply-html-hook (car html-and-images)))) (insert (org-mime-multipart (org-export-string-as (org-babel-trim (funcall bhook body ...)) (if (eq fmt ...) (quote org) (quote ascii)) t) html) (mapconcat (quote identity) images "\n")))))
  (let ((bhook (function (lambda (body fmt) (let ((hook ...)) (if (> ... 0) (let ... ...) body))))) (fmt (if (symbolp fmt) fmt (intern fmt)))) (cond ((eq fmt (quote org)) (require (quote ox-org)) (insert (org-export-string-as (org-babel-trim (funcall bhook body (quote org))) (quote org) t))) ((eq fmt (quote ascii)) (require (quote ox-ascii)) (insert (org-export-string-as (concat "#+Title:\n" (funcall bhook body (quote ascii))) (quote ascii) t))) ((or (eq fmt (quote html)) (eq fmt (quote html-ascii))) (require (quote ox-ascii)) (require (quote ox-org)) (let* ((org-link-file-path-type (quote absolute)) (org-export-htmlize-output-type (quote inline-css)) (html-and-images (org-mime-replace-images (org-export-string-as ... ... t) file)) (images (cdr html-and-images)) (html (org-mime-apply-html-hook (car html-and-images)))) (insert (org-mime-multipart (org-export-string-as (org-babel-trim ...) (if ... ... ...) t) html) (mapconcat (quote identity) images "\n"))))))
  org-mime-compose(#("#+STARTUP: showeverything logdone\n#+options: toc:nil num:nil\n#+title: Org Mime Org Buffer HTMLize test\n\n* Intro\n\nHere's a simple graph:\n\n#+BEGIN_SRC dot :file org-test.png :cmdline -Kdot -Tpng\ndigraph G {\n  rankdir=LR;\n  node [shape=box];\n  A -> B;\n  B -> C;\n  C -> A;\n}\n#+END_SRC\n\nWill org-mime-org-buffer-htmlize automatically include the image?\n\n" 0 33 (fontified t font-lock-fontified t face org-meta-line) 33 34 (fontified t) 34 60 (fontified t font-lock-fontified t face org-meta-line) 60 61 (fontified t) 61 69 (fontified t font-lock-fontified t face org-document-info-keyword) 69 70 (fontified t) 70 103 (fontified t font-lock-fontified t face org-document-title) 103 104 (fontified t) 104 106 (fontified t face org-level-1) 106 111 (fontified t face org-level-1) 111 137 (fontified t) 137 192 (fontified t font-lock-fontified t font-lock-multiline t face org-block-begin-line) 192 193 (fontified t font-lock-fontified t font-lock-multiline t face org-block-begin-line) 193 270 (fontified t font-lock-fontified t font-lock-multiline t src-block t) 270 271 (fontified t font-lock-fontified t font-lock-multiline t src-block t) 271 280 (fontified t font-lock-fontified t font-lock-multiline t face org-block-end-line) 280 281 (fontified t face org-block-end-line) 281 282 (fontified t) 282 349 (fontified t)) html "/Users/davisp/Dropbox/HMH/test.org" nil "test")
  (let* ((region-p (org-region-active-p)) (file (buffer-file-name (current-buffer))) (subject (if (not file) (buffer-name (buffer-base-buffer)) (file-name-sans-extension (file-name-nondirectory file)))) (body-start (or (and region-p (region-beginning)) (save-excursion (goto-char (point-min))))) (body-end (or (and region-p (region-end)) (point-max))) (temp-body-file (make-temp-file "org-mime-export")) (body (buffer-substring body-start body-end))) (org-mime-compose body (or fmt (quote org)) file nil subject))
  org-mime-send-buffer(html)
  org-mime-org-buffer-htmlize()
  call-interactively(org-mime-org-buffer-htmlize record nil)
  command-execute(org-mime-org-buffer-htmlize record)
  execute-extended-command(nil "org-mime-org-buffer-htmlize")
  call-interactively(execute-extended-command nil nil)
  command-execute(execute-extended-command)

^ permalink raw reply	[relevance 3%]

* Re: Html export error
  2015-08-11 16:29  5% Html export error Flávio L. C. de Moura
  2015-08-11 16:37  0% ` Haochen Xie
@ 2015-08-11 16:48  0% ` Kyle Meyer
  1 sibling, 0 replies; 43+ results
From: Kyle Meyer @ 2015-08-11 16:48 UTC (permalink / raw)
  To: Flávio L. C. de Moura; +Cc: emacs-orgmode

Hello,

flaviomoura@unb.br (Flávio L. C. de Moura) wrote:
> Hi,
>
> After the last org update, I am getting an error concerning the head of the
> org file:
[...]
> If I org-html-export-as-html then I get:
>
> apply: Wrong type argument: listp, #("Flávio L. C. de Moura" 0 21
> (:parent (#0)))

This seems similar to

  http://permalink.gmane.org/gmane.emacs.orgmode/99535

and

  http://permalink.gmane.org/gmane.emacs.orgmode/99680

and is likely an issue with compiling the new installation while the old
one is loaded.

Try installing from the package-list-packages before Org has been
loaded.

--
Kyle

^ permalink raw reply	[relevance 0%]

* Re: Html export error
  2015-08-11 16:29  5% Html export error Flávio L. C. de Moura
@ 2015-08-11 16:37  0% ` Haochen Xie
  2015-08-11 16:48  0% ` Kyle Meyer
  1 sibling, 0 replies; 43+ results
From: Haochen Xie @ 2015-08-11 16:37 UTC (permalink / raw)
  To: Flávio L. C. de Moura; +Cc: emacs-orgmode

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

Hi Flávio,

I can confirm the same problem on my box. After reverting to the old
version, exporting came back to normal.

Haochen


--

Mail from Haochen Xie

On Wed, Aug 12, 2015 at 1:29 AM, Flávio L. C. de Moura <flaviomoura@unb.br>
wrote:

> Hi,
>
> After the last org update, I am getting an error concerning the head of the
> org file:
>
> #+TITLE: 117366 - Lógica Computacional 1 (Turma D)
> #+AUTHOR: Flávio L. C. de Moura
>
> If I org-html-export-as-html then I get:
>
> apply: Wrong type argument: listp, #("Flávio L. C. de Moura" 0 21
> (:parent (#0)))
>
> If I remove these lines, everything works fine...
>
> Any help is appreciated.
>
> Best regards,
> Flávio.
>
>
>

[-- Attachment #2: Type: text/html, Size: 1692 bytes --]

^ permalink raw reply	[relevance 0%]

* Html export error
@ 2015-08-11 16:29  5% Flávio L. C. de Moura
  2015-08-11 16:37  0% ` Haochen Xie
  2015-08-11 16:48  0% ` Kyle Meyer
  0 siblings, 2 replies; 43+ results
From: Flávio L. C. de Moura @ 2015-08-11 16:29 UTC (permalink / raw)
  To: emacs-orgmode

Hi,

After the last org update, I am getting an error concerning the head of the
org file:

#+TITLE: 117366 - Lógica Computacional 1 (Turma D) 
#+AUTHOR: Flávio L. C. de Moura

If I org-html-export-as-html then I get:

apply: Wrong type argument: listp, #("Flávio L. C. de Moura" 0 21
(:parent (#0)))

If I remove these lines, everything works fine...

Any help is appreciated.

Best regards,
Flávio.

^ permalink raw reply	[relevance 5%]

* Re: Change in ox export for #+DATE keywords
  2015-08-08  3:51  0% ` Peter Salazar
@ 2015-08-08  7:20  0%   ` Alex Bennée
  0 siblings, 0 replies; 43+ results
From: Alex Bennée @ 2015-08-08  7:20 UTC (permalink / raw)
  To: Peter Salazar; +Cc: org-mode


Peter Salazar <cycleofsong@gmail.com> writes:

> As I mentioned, I'm getting that same error, not just with #+DATE but also
> with #+TITLE, #+AUTHOR, etc. Any one of these is sufficient to break export
> for me.

Yeah further poking has shown they have all broken. I can't quite follow
the logic of the patch as to what the new parse is expecting.

>
> On Fri, Aug 7, 2015 at 3:59 PM, Alex Bennée <alex.bennee@linaro.org> wrote:
>
>> Hi,
>>
>> I've been using org-mode as a source for my presentations but exporting
>> broke today following an ELPA update. It seems the line:
>>
>> #+DATE: KVM Forum 2015
>>
>> Is no longer acceptable. I think this changed as of:
>>
>> ae9db17482a183e5613428c3abf1c691f86b4ac0
>>
>> I'm not quite sure what the new "parse" is expecting. If I change it to
>> a datestamp I see breakage on other lines like the title:
>>
>> apply: Wrong type argument: listp, #("My presentation title" 0 26 (:parent
>> (#0)))
>>
>> So what form am I meant to be using for these options and why the change?
>>
>> --
>> Alex Bennée
>>
>>

-- 
Alex Bennée

^ permalink raw reply	[relevance 0%]

* Re: Change in ox export for #+DATE keywords
  2015-08-07 19:59  5% Change in ox export for #+DATE keywords Alex Bennée
@ 2015-08-08  3:51  0% ` Peter Salazar
  2015-08-08  7:20  0%   ` Alex Bennée
  0 siblings, 1 reply; 43+ results
From: Peter Salazar @ 2015-08-08  3:51 UTC (permalink / raw)
  To: Alex Bennée; +Cc: org-mode

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

As I mentioned, I'm getting that same error, not just with #+DATE but also
with #+TITLE, #+AUTHOR, etc. Any one of these is sufficient to break export
for me.

On Fri, Aug 7, 2015 at 3:59 PM, Alex Bennée <alex.bennee@linaro.org> wrote:

> Hi,
>
> I've been using org-mode as a source for my presentations but exporting
> broke today following an ELPA update. It seems the line:
>
> #+DATE: KVM Forum 2015
>
> Is no longer acceptable. I think this changed as of:
>
> ae9db17482a183e5613428c3abf1c691f86b4ac0
>
> I'm not quite sure what the new "parse" is expecting. If I change it to
> a datestamp I see breakage on other lines like the title:
>
> apply: Wrong type argument: listp, #("My presentation title" 0 26 (:parent
> (#0)))
>
> So what form am I meant to be using for these options and why the change?
>
> --
> Alex Bennée
>
>

[-- Attachment #2: Type: text/html, Size: 1291 bytes --]

^ permalink raw reply	[relevance 0%]

* Change in ox export for #+DATE keywords
@ 2015-08-07 19:59  5% Alex Bennée
  2015-08-08  3:51  0% ` Peter Salazar
  0 siblings, 1 reply; 43+ results
From: Alex Bennée @ 2015-08-07 19:59 UTC (permalink / raw)
  To: emacs-orgmode

Hi,

I've been using org-mode as a source for my presentations but exporting
broke today following an ELPA update. It seems the line:

#+DATE: KVM Forum 2015

Is no longer acceptable. I think this changed as of:

ae9db17482a183e5613428c3abf1c691f86b4ac0

I'm not quite sure what the new "parse" is expecting. If I change it to
a datestamp I see breakage on other lines like the title:

apply: Wrong type argument: listp, #("My presentation title" 0 26 (:parent (#0)))

So what form am I meant to be using for these options and why the change?

-- 
Alex Bennée

^ permalink raw reply	[relevance 5%]

* Re: Error when using org-ctrl-c-ctrl-c to add tags
  @ 2015-04-26 21:59  7%           ` Ken Mankoff
  0 siblings, 0 replies; 43+ results
From: Ken Mankoff @ 2015-04-26 21:59 UTC (permalink / raw)
  To: Marc Ihm; +Cc: Org-mode, vicentemvp, Rasmus

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

Hi,

I'm still experiencing this bug, although with a slightly different error
message. When "C-c C-c" on a headline, I see:

org-set-tags: Wrong type argument: listp, org-tags-completion-function

Compared to the original report of:

apply: Wrong type argument: listp, org-tags-completion-function

I'm running latest git head:
Org-mode version 8.3beta (release_8.3beta-1078-gd13a2b @
/Users/mankoff/local/src/org-mode/lisp/)


  -k.



On Mon, Apr 20, 2015 at 4:02 PM, Marc Ihm <marc@ihm.name> wrote:

> Works for me too, and probably better than my suggestion :-)
>
> best regards
> Marc
>
>

[-- Attachment #2: Type: text/html, Size: 2070 bytes --]

^ permalink raw reply	[relevance 7%]

* Re: Error when using org-ctrl-c-ctrl-c to add tags
  2015-04-18  2:05  5% Error when using org-ctrl-c-ctrl-c to add tags Vicente Vera
@ 2015-04-18 17:08  0% ` Rasmus
  0 siblings, 0 replies; 43+ results
From: Rasmus @ 2015-04-18 17:08 UTC (permalink / raw)
  To: emacs-orgmode

Hi Vicenet,

Vicente Vera <vicentemvp@gmail.com> writes:

> Hello. This shows up when trying to add tags to a headline with
> org-ctrl-c-ctrl-c:
>
> apply: Wrong type argument: listp, org-tags-completion-function

I can't reproduce by clicking C-c C-c on a headline.  Can you be more
specific as to how you trigger the error?  Do you see it when you start
Emacs via emacs -q?

Thanks,
Rasmus

-- 
Need more coffee. . .

^ permalink raw reply	[relevance 0%]

* Error when using org-ctrl-c-ctrl-c to add tags
@ 2015-04-18  2:05  5% Vicente Vera
  2015-04-18 17:08  0% ` Rasmus
  0 siblings, 1 reply; 43+ results
From: Vicente Vera @ 2015-04-18  2:05 UTC (permalink / raw)
  To: emacs-orgmode

Hello. This shows up when trying to add tags to a headline with
org-ctrl-c-ctrl-c:

apply: Wrong type argument: listp, org-tags-completion-function

Org-mode version 8.3beta (release_8.3beta-1045-gd8494b @
/usr/local/share/emacs/site-lisp/org/)
GNU Emacs 24.5.50.1 (i686-pc-linux-gnu, GTK+ Version 3.4.2)

^ permalink raw reply	[relevance 5%]

Results 1-43 of 43 | reverse | options above
-- pct% links below jump to the message on this page, permalinks otherwise --
2015-04-18  2:05  5% Error when using org-ctrl-c-ctrl-c to add tags Vicente Vera
2015-04-18 17:08  0% ` Rasmus
2015-04-18 18:50     Vicente Vera
2015-04-19 14:36     ` Marc Ihm
2015-04-19 16:05       ` Marc Ihm
2015-04-20  8:19         ` Rasmus
2015-04-20 12:20           ` Rasmus
2015-04-20 20:02             ` Marc Ihm
2015-04-26 21:59  7%           ` Ken Mankoff
2015-08-07 19:59  5% Change in ox export for #+DATE keywords Alex Bennée
2015-08-08  3:51  0% ` Peter Salazar
2015-08-08  7:20  0%   ` Alex Bennée
2015-08-11 16:29  5% Html export error Flávio L. C. de Moura
2015-08-11 16:37  0% ` Haochen Xie
2015-08-11 16:48  0% ` Kyle Meyer
2015-10-28 15:23  3% Can't email multipart/alternative anymore Peter Davis
2015-11-03 10:19  3% Bug: Export fails with a type error [8.3.2 (8.3.2-10-g00dacd-elpa @ /Users/hedman/.emacs.d/elpa/org-20151005/)] Noruna AB c/o Hedman
2015-11-03 10:49  0% ` Noruna AB c/o Hedman
2015-11-18 20:29  5% Exporting a subtree Peter Davis
2015-11-18 20:35  0% ` John Hendy
2015-11-18 20:51  0%   ` Nick Dokos
2015-11-20 16:21  0% ` Brett Viren
2015-11-18 20:43  0% Peter Davis
2015-11-18 22:30  0% ` John Hendy
2015-11-19  1:20  0%   ` Peter Davis
2015-11-19 13:32  0% Peter Davis
2015-11-19 13:51  0% Peter Davis
2016-01-20  7:39  3% Bug: Cannot export document to HTML or Markdown if it has a title [8.3.2 (8.3.2-59-g3d4c46-elpa @ /Users/matt/.emacs.d/elpa/org-20160104/)] Matt Moriarity
2016-01-31 22:06  0% ` Nicolas Goaziou
2016-02-03 14:56  5%   ` Max Linke
2016-02-04  8:40  0%     ` Nicolas Goaziou
2016-02-04 20:50  0%       ` Max Linke
2016-01-27 19:23  5% Bug: Export breaks on documents with title [8.3.3 (8.3.3-26-ge92a06-elpaplus @ /Users/leafac/.emacs.d/elpa/org-plus-contrib-20160125/)] Leandro Facchinetti
2016-01-28  0:14  0% ` Kyle Meyer
2016-02-28 22:39  4% Bug: HTML export is broken when there are document level headings (TITLE, AUTHOR etc.) [8.3.4 (8.3.4-elpa @ /media/home/neutrico/.emacs.d/elpa/org-20160222/)] neutrico
2016-02-29 21:15  0% ` Nicolas Goaziou
2016-02-29 21:27  0%   ` Marcin Antczak
2016-11-07 19:30  6% Bug: HTML exports issues: none not working, and issues with #+TITLE Frederick Giasson
2016-11-08 11:07  0% ` Nicolas Goaziou
2016-11-26 20:01  5% Error publishing a simple html page Leandro Noferini
2017-06-05 15:17  2% Bug: Beamer example (info node 12.8.6) fails to compile [9.0.7 (9.0.7-elpa @ /Users/gtomas/.emacs.d/elpa/org-20170515/)] Gil Tomás
2017-06-07  9:10  0% ` Nicolas Goaziou
2017-06-30 13:22  5% Using org-mode via vSSH on iPad Peter Davis
2017-06-30 14:16  5% ` Michael Ax
2017-06-30 16:41  0%   ` Peter Davis
2018-06-12 11:24  1% Bug: LaTeX export to PDF [9.1.13 (9.1.13-elpa @ c:/Users/kmw/AppData/Roaming/.emacs.d/elpa/org-9.1.13/)] Meyer-Wegener, Klaus
2018-06-26  9:39  0% ` Nicolas Goaziou
2020-12-12 19:59  2% Bug: html export fails after upgrading to 9.4 [9.4.1 (9.4.1-elpa @ /Users/jb/Library/Preferences/Aquamacs Emacs/Packages/elpa/org-20201212/)] Johannes Brauer
2020-12-13  4:32  0% ` Kyle Meyer

Code repositories for project(s) associated with this public inbox

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

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).