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:
parent
33f8b1b02f
commit
8994c096a8
@ -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)
|
||||||
|
Loading…
Reference in New Issue
Block a user