1
0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-11 09:20:32 +00:00

org-bibtex.el: Fix typos

* org-bibtex.el (org-bibtex-read-buffer)
(org-bibtex-import-from-file): Fix typos.
This commit is contained in:
Bastien Guerry 2014-03-19 12:01:57 +01:00
parent 33f8b1b02f
commit 8994c096a8

View File

@ -631,7 +631,7 @@ This uses `bibtex-parse-entry'."
(defun org-bibtex-read-buffer (buffer) (defun org-bibtex-read-buffer (buffer)
"Read all bibtex entries in BUFFER and save to `org-bibtex-entries'. "Read all bibtex entries in BUFFER and save to `org-bibtex-entries'.
Return the number of saved entries." Return the number of saved entries."
(interactive "bbuffer: ") (interactive "bBuffer: ")
(let ((start-length (length org-bibtex-entries))) (let ((start-length (length org-bibtex-entries)))
(with-current-buffer buffer (with-current-buffer buffer
(save-excursion (save-excursion
@ -641,12 +641,12 @@ Return the number of saved entries."
(org-bibtex-read) (org-bibtex-read)
(bibtex-beginning-of-entry)))) (bibtex-beginning-of-entry))))
(let ((added (- (length org-bibtex-entries) start-length))) (let ((added (- (length org-bibtex-entries) start-length)))
(message "parsed %d entries" added) (message "Parsed %d entries" added)
added))) added)))
(defun org-bibtex-read-file (file) (defun org-bibtex-read-file (file)
"Read FILE with `org-bibtex-read-buffer'." "Read FILE with `org-bibtex-read-buffer'."
(interactive "ffile: ") (interactive "fFile: ")
(org-bibtex-read-buffer (find-file-noselect file 'nowarn 'rawfile))) (org-bibtex-read-buffer (find-file-noselect file 'nowarn 'rawfile)))
(defun org-bibtex-write () (defun org-bibtex-write ()
@ -692,7 +692,7 @@ Return the number of saved entries."
(defun org-bibtex-import-from-file (file) (defun org-bibtex-import-from-file (file)
"Read bibtex entries from FILE and insert as Org-mode headlines after point." "Read bibtex entries from FILE and insert as Org-mode headlines after point."
(interactive "ffile: ") (interactive "fFile: ")
(dotimes (_ (org-bibtex-read-file file)) (dotimes (_ (org-bibtex-read-file file))
(save-excursion (org-bibtex-write)) (save-excursion (org-bibtex-write))
(re-search-forward org-property-end-re) (re-search-forward org-property-end-re)