X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=org-ref.org;h=e5a3c47bd2025ca0c8d36e87b8c5c0bc4b77c2cd;hp=858ab3798d3be5776eedcc66df196022600d94d9;hb=8f9699caaa035cd1443dd8fe66c6d1d64bcc6ffd;hpb=4144df0efbeb417b15863cf7338afb4b857023aa

diff --git a/org-ref.org b/org-ref.org
index 858ab37..e5a3c47 100644
--- a/org-ref.org
+++ b/org-ref.org
@@ -2716,8 +2716,8 @@ ref:test citep:test  label:rett
   (interactive)
   (let* ((object (org-element-context))
 	 (type (org-element-property :type object)))
-
-    (cond
+    (save-excursion
+      (cond
      ;; cite links
      ((-contains? org-ref-cite-types type)
       (message (org-ref-get-citation-string-at-point)))
@@ -2741,7 +2741,7 @@ ref:test citep:test  label:rett
 		  " occurence"
 		  (when (or (= count 0)
 			    (> count 1))
-		    "s"))))))))
+		    "s")))))))))
 
 
 (when org-ref-show-citation-on-enter
@@ -2795,6 +2795,7 @@ Now, let us define a function that inserts the cite links:
   "Insert selected KEYS as cite link. Append KEYS if you are on a link.
 Technically, this function should return a string that is inserted by helm. This function does the insertion and gives helm an empty string to insert. This lets us handle appending to a link properly."
   (let* ((object (org-element-context)))
+  (message-box "prefix is %s" helm-current-prefix-arg)
     (cond
      ;; case where we are in a link
      ((and (equal (org-element-type object) 'link)