X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=org-ref.org;h=1f66c11842d017843aa391a27cc66e13bc4debc8;hp=0c2e1d972afac69b11398b504d2b2feaa20b133b;hb=f60345ce8373124a6718dfa963b598650dfbb656;hpb=56658921640ee1eddc7077dd0d2fc9c40e696fd0 diff --git a/org-ref.org b/org-ref.org index 0c2e1d9..1f66c11 100644 --- a/org-ref.org +++ b/org-ref.org @@ -3131,9 +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)) - (message-box "Replacing %s with %s" - (car (org-ref-get-bibtex-key-and-file)) - (mapconcat 'identity keys ",")) (setf (buffer-substring (org-element-property :begin object) (org-element-property :end object)) @@ -3146,7 +3143,7 @@ C-u C-u will change the key at point to the selected keys. ;; replace space at end to avoid collapsing into next word. " "))) (t - (message-box "Not found")))) + (message "Not found")))) ;; We are next to a link, and we want to append ;; next to a link means one character back is on a link.