Fix argument to org-toggle-tag.
* lisp/org-bibtex.el: (org-bibtex-create, org-bibtex-write): Change argument of org-toggle-tag to 'on. (Other arguments, e.g., t, have no effect).
This commit is contained in:
parent
d017fe977f
commit
bfed5b0aff
|
@ -555,7 +555,7 @@ If nonew is t, add data to the headline of the entry at point."
|
|||
(org-bibtex-put "TITLE" title)))
|
||||
(org-bibtex-put "TYPE" (substring (symbol-name type) 1))
|
||||
(org-bibtex-fleshout type arg)
|
||||
(mapc (lambda (tag) (org-toggle-tag tag t)) org-bibtex-tags)))
|
||||
(mapc (lambda (tag) (org-toggle-tag tag 'on)) org-bibtex-tags)))
|
||||
|
||||
(defun org-bibtex-create-in-current-entry (&optional arg)
|
||||
"Add bibliographical data to the current entry.
|
||||
|
@ -594,7 +594,7 @@ This uses `bibtex-parse-entry'."
|
|||
(let ((entry (pop *org-bibtex-entries*))
|
||||
(org-special-properties nil)) ; avoids errors with `org-entry-put'
|
||||
(flet ((val (field) (cdr (assoc field entry)))
|
||||
(togtag (tag) (org-toggle-tag tag t)))
|
||||
(togtag (tag) (org-toggle-tag tag 'on)))
|
||||
(org-insert-heading)
|
||||
(insert (val :title))
|
||||
(org-bibtex-put "TITLE" (val :title))
|
||||
|
|
Loading…
Reference in New Issue