Request for new action: insert link to pdf and title

[tmalsburg]

Request for new action: insert link to pdf and title

[tmalsburg]

Wouldn't it be better to generate a link of the following form?:

** [[/home/julian/Documents/Refs/Lurton2015.pdf][Backscatter measurements by seafloor-mapping sonars]] 

Or do you really need to see the Bibtex-key?

The code for the citation format above is:

    (defun helm-bibtex-format-citation-my-org-link-to-PDF (keys)
      "Formatter for org-links to PDF.  Uses first matching PDF if
    several are available.  Entries for which no PDF is available are
    omitted."
      (s-join ", " (-non-nil
                    (--map (when (cdr it)
                               (format "[[%s][%s]]"
                                       (car it)
                                       (helm-bibtex-get-value "title" (cdr it))))
                           (--map (cons (helm-bibtex-find-pdf it)
                                        (helm-bibtex-get-entry it)) keys)))))

    (setq helm-bibtex-format-citation-functions
      '((org-mode      . helm-bibtex-format-citation-my-org-link-to-PDF)
        (latex-mode    . helm-bibtex-format-citation-cite)
        (markdown-mode . helm-bibtex-format-citation-pandoc-citeproc)
        (default       . helm-bibtex-format-citation-default)))

[jmburgos]

Thanks Titus! The Bibtex key would be useful because it gives me the first author and year of publication. Could you add it?

[tmalsburg]

Here ya go:

(defun helm-bibtex-format-citation-my-org-link-to-PDF (keys)
  "Formatter for org-links to PDF.  Uses first matching PDF if
several are available.  Entries for which no PDF is available are
omitted."
  (s-join ", " (-non-nil
                (--map (when (cdr it)
                         (format "[[%s][%s]] %s"
                                 (car it)
                                 (helm-bibtex-get-value "=key=" (cdr it))
                                 (helm-bibtex-get-value "title" (cdr it))))
                       (--map (cons (helm-bibtex-find-pdf it)
                                    (helm-bibtex-get-entry it)) keys)))))

[jmburgos]

Thanks again! One last question. I would like to have this as an action, rather than the default citation format in org mode (because most of the time I use LaTex citations in org-mode). In other words, I would like to call helm-bibtex, select a reference, press TAB, and see "Insert link to pdf and title" as one of the possible actions. That is why I was trying to make a function similar to helm-bibtex-insert-key. I suspect cannot just modify helm-source bibtex as below, calling helm-bibtex-format-citation-my-org-link-to-PDF as one of the actions, right?

(defvar helm-source-bibtex
'((name . "BibTeX entries")
(init . helm-bibtex-init)
(candidates . helm-bibtex-candidates)
(filtered-candidate-transformer . helm-bibtex-candidates-formatter)
(action . (("Open PDF file (if present)" . helm-bibtex-open-pdf)
("Insert link to pdf and title" . Helm-bibtex-format-citation-my-org-link-to-PDF) ; NEW ACTION
("Open URL or DOI in browser" . helm-bibtex-open-url-or-doi)
("Insert citation" . helm-bibtex-insert-citation)
("Insert reference" . helm-bibtex-insert-reference)
("Insert BibTeX key" . helm-bibtex-insert-key)
("Insert BibTeX entry" . helm-bibtex-insert-bibtex)
("Attach PDF to email" . helm-bibtex-add-PDF-attachment)
("Edit notes" . helm-bibtex-edit-notes)
("Show entry" . helm-bibtex-show-entry))))
"Source for searching in BibTeX files.")

[tmalsburg]

Hi Julian, sorry I don't have time to deal with this. You have to create a new function similar to helm-bibtex-insert-citation and add it as an action to the source. Perhaps a good opportunity to get your feet wet. Basic Elisp knowledge will allow you to get much more out of Emacs, so it should be worth your time.

[jmburgos]

Ok, fair enough. :) I will dive into this. Many thanks for your help!