add set dialect to org-ref-bib-citation

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

diff --git a/org-ref.el b/org-ref.el
index a3ad826e09d77d2951c0ea402332609c040c61e9..aecf1aea111d2ba034ec11f03f54673bbdf4ba18 100644 (file)
--- a/org-ref.el
+++ b/org-ref.el
@@ -972,7 +972,7 @@ ARG does nothing."
                    (org-ref-count-labels label))))
  (lambda (keyword desc format)
    (cond
-    ((eq format 'html) (format "(<label>%s</label>)" path))
+    ((eq format 'html) (format "(<label>%s</label>)" keyword))
     ((eq format 'latex)
      (format "\\label{%s}" keyword)))))
 
@@ -1051,7 +1051,7 @@ ARG does nothing."
  ;formatting
  (lambda (keyword desc format)
    (cond
-    ((eq format 'html) (format "(<ref>%s</ref>)" path))
+    ((eq format 'html) (format "<a href=\"#%s\">%s</a>" keyword keyword))
     ((eq format 'latex)
      (format "\\ref{%s}" keyword)))))
 
@@ -2093,7 +2093,7 @@ arg (ALTERNATIVE-CITE) to get a menu of citation types."
 (defun org-ref-bib-citation ()
   "From a bibtex entry, create and return a simple citation string.
 This assumes you are in an article."
-
+  (bibtex-set-dialect nil t)
   (bibtex-beginning-of-entry)
   (let* ((cb (current-buffer))
         (bibtex-expand-strings t)