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 148e98cd836f84634d4897f8eae631ef901454df..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,7 +391,7 @@ 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"
@@ -420,7 +421,11 @@ label:test
 
 
 (setq org-ref-cite-re
-  (concat "\\(" (mapconcat 'identity org-ref-cite-types "\\|") "\\)"
+      (concat "\\(" (mapconcat
+                    (lambda (x)
+                      (replace-regexp-in-string "\*" "\\\\*" x)
+                      )
+                    org-ref-cite-types "\\|") "\\)"
   ":\\([a-zA-Z0-9-_:]*,?\\)*"))
 
 
@@ -434,15 +439,18 @@ label:test
 
 (defface org-ref-cite-face
   `((t (:inherit org-link :foreground ,org-ref-cite-color)))
-  "Color for cite links")
+  "Color for cite-like links in org-ref.")
+
 
 (defface org-ref-label-face
   `((t (:inherit org-link :foreground ,org-ref-label-color)))
-  "Color for cite links")
+  "Color for ref links in org-ref.")
+
 
 (defface org-ref-ref-face
   `((t (:inherit org-link :foreground ,org-ref-ref-color)))
-  "Color for cite links")
+  "Face for ref links in org-ref.")
+
 
 (when org-ref-colorize-links
   (highlight-regexp org-ref-cite-re 'org-ref-cite-face)
@@ -1705,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
 
@@ -3514,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."