Function: org-bibtex

org-bibtex is an interactive and byte-compiled function defined in ol-bibtex.el.gz.

Signature

(org-bibtex FILENAME)

Documentation

Export each headline in the current file to a bibtex entry.

Headlines are exported using org-bibtex-headline.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/org/ol-bibtex.el.gz
;;; BibTeX <-> Org headline translation functions
(defun org-bibtex (filename)
  "Export each headline in the current file to a bibtex entry.
Headlines are exported using `org-bibtex-headline'."
  (interactive
   (list (read-file-name
	  "BibTeX file: " nil nil nil
	  (let ((file (buffer-file-name (buffer-base-buffer))))
	    (and file
		 (file-name-nondirectory
		  (concat (file-name-sans-extension file) ".bib")))))))
  (let ((error-point
         (catch 'bib
           (let ((bibtex-entries
                  (remove nil (org-map-entries
                               (lambda ()
                                 (condition-case nil
                                     (org-bibtex-headline)
                                   (error (throw 'bib (point)))))))))
             (with-temp-file filename
               (insert (mapconcat #'identity bibtex-entries "\n")))
             (message "Successfully exported %d BibTeX entries to %s"
                      (length bibtex-entries) filename)
	     nil))))
    (when error-point
      (goto-char error-point)
      (message "BibTeX error at %S" (nth 4 (org-heading-components))))))