X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=org-ref.org;h=7d66a799189df41c15debbeae0fb6c2a5c2926fb;hp=cde0cefc8f9086ff2e85e554049a85fb05d56c74;hb=46a88d1f19dd80cb33673bbd61a2eef3b099dc91;hpb=56ba56b8a81178a301fb174d8d8c6623f9ed3e3b

diff --git a/org-ref.org b/org-ref.org
index cde0cef..7d66a79 100644
--- a/org-ref.org
+++ b/org-ref.org
@@ -1100,7 +1100,7 @@ Now, we can put all the labels together which will give us a list of candidates.
 #+END_SRC
 
 Let us make a helm function to insert a label link. This will help you enter unique labels.
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle org-ref.el
 (defun org-ref-helm-insert-label-link ()
   "Insert a label link. helm just shows you what labels already exist."
   (interactive)
@@ -1142,7 +1142,7 @@ Alternatively, you may want to just call a function that inserts a link with com
 
 Another alternative ref insertion is to use helm.
 
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle org-ref.el
 (defun org-ref-helm-insert-ref-link ()
   "Helm menu to insert ref links to labels in the document.
 Use C-u to insert a different kind of ref link."
@@ -3131,8 +3131,6 @@ C-u C-u will change the key at point to the selected keys.
 	(insert (concat "," (mapconcat 'identity keys ","))))
        ;; double prefix, replace key at point
        ((equal helm-current-prefix-arg '(16))
-		     (car (org-ref-get-bibtex-key-and-file))
-		     (mapconcat 'identity keys ","))
 	(setf (buffer-substring
 	       (org-element-property :begin object)
 	       (org-element-property :end object))