rm interactive on org-ref-key-in-file

[org-ref.git] / org-ref.org

diff --git a/org-ref.org b/org-ref.org
index b18d442f494cd8ce342c99dc41287352c97fc823..8852a84dd72c48895a52ce4113aaabfe086a617a 100644 (file)
--- a/org-ref.org
+++ b/org-ref.org
@@ -66,6 +66,7 @@ The only external require is reftex-cite
 (require 'reftex-cite)
 (require 'dash)
 (require 'helm)
+(require 'helm-config)
 (require 'helm-bibtex)
 #+END_SRC
 
@@ -390,12 +391,13 @@ ref:test
 
 label:test
 
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle org-ref.el
 (defcustom org-ref-colorize-links
   t
   "When non-nil, change colors of links"
   :group 'org-ref)
 
+
 (defcustom org-ref-cite-color
   "forest green"
   "Color of cite like links"
@@ -1711,9 +1713,15 @@ Now, we can see if an entry is in a file.
 #+BEGIN_SRC emacs-lisp :tangle org-ref.el
 (defun org-ref-key-in-file-p (key filename)
   "determine if the key is in the file"
-  (interactive "skey: \nsFile: ")
   (save-current-buffer
     (let ((bibtex-files (list filename)))
+      ;; This is something I am trying because when the bibtex file is open, and
+      ;; you have added to it, the only way I find to get the update to update
+      ;; is to close it and reopen it. or to save it and revert it.
+      (when (get-file-buffer filename)
+       (set-buffer (get-file-buffer filename))
+       (save-buffer)
+       (revert-buffer t t))
       (bibtex-search-entry key t))))
 #+END_SRC
 
@@ -3520,6 +3528,7 @@ This code provides a helm interface to things you can do when you click on a cit
            (org-ref-bib-citation)))
       "!!! No entry found !!!" )))
 
+
 (defun org-ref-cite-candidates ()
   "Generate the list of possible candidates for click actions on a cite link.
 Checks for pdf and doi, and add appropriate functions."