cleaning up tag entries

diff --git a/org-ref.org b/org-ref.org
index e59f91df88044c9559454985759c418b2008d90c..51671bda39e6a110fcb387c6d3e40d9edb57bda6 100644 (file)
--- a/org-ref.org
+++ b/org-ref.org
@@ -3425,8 +3425,9 @@ Next, we are going to add keywords to the helm interface.
 1. Make the default action to insert selected keys.
 2. Make open entry second action
 #+BEGIN_SRC emacs-lisp :tangle org-ref.el
 1. Make the default action to insert selected keys.
 2. Make open entry second action
 #+BEGIN_SRC emacs-lisp :tangle org-ref.el

-(defun org-ref-tag-entries (candidates)
-  "Set tags on selected entries."
+(defun org-ref-helm-tag-entries (candidates)
+  "Set tags on selected bibtex entries from helm.
+User is prompted for tags."

   (let ((keywords (read-input "Keywords (comma separated): ")))
     (loop for key in (helm-marked-candidates)
          do
   (let ((keywords (read-input "Keywords (comma separated): ")))
     (loop for key in (helm-marked-candidates)
          do


@@ -3453,7 +3454,7 @@ Next, we are going to add keywords to the helm interface.
                   ("Insert BibTeX entry"          . helm-bibtex-insert-bibtex)
                   ("Attach PDF to email"          . helm-bibtex-add-PDF-attachment)
                   ("Edit notes"                   . helm-bibtex-edit-notes)
                   ("Insert BibTeX entry"          . helm-bibtex-insert-bibtex)
                   ("Attach PDF to email"          . helm-bibtex-add-PDF-attachment)
                   ("Edit notes"                   . helm-bibtex-edit-notes)

-                   ("Tag entries"                  . org-ref-tag-entries)
+                   ("Add keywords to entries"      . org-ref-helm-tag-entries)

                   ))))
 #+END_SRC
 
                   ))))
 #+END_SRC