]> git.donarmstrong.com Git - org-ref.git/commitdiff
fix bug in bibliography message
authorJohn Kitchin <jkitchin@andrew.cmu.edu>
Mon, 26 Jan 2015 21:53:29 +0000 (16:53 -0500)
committerJohn Kitchin <jkitchin@andrew.cmu.edu>
Mon, 26 Jan 2015 21:53:29 +0000 (16:53 -0500)
org-ref.org

index 40a29405d95a0e3a849003c180917238c95486c5..04746fe9c643408730cdf07700fb42264061a121 100644 (file)
@@ -3133,13 +3133,11 @@ To get a lighter weight message about the label, ref and cite links, we define a
            ;; we find the one clicked on. we want to
            ;; search forward to next comma from point
            (save-excursion
            ;; we find the one clicked on. we want to
            ;; search forward to next comma from point
            (save-excursion
-              (goto-char link-string-beginning)
              (if (search-forward "," link-string-end 1 1)
                  (setq key-end (- (match-end 0) 1)) ; we found a match
                (setq key-end (point)))) ; no comma found so take the point
            ;; and backward to previous comma from point
            (save-excursion
              (if (search-forward "," link-string-end 1 1)
                  (setq key-end (- (match-end 0) 1)) ; we found a match
                (setq key-end (point)))) ; no comma found so take the point
            ;; and backward to previous comma from point
            (save-excursion
-              (goto-char link-string-beginning)
              (if (search-backward "," link-string-beginning 1 1)
                  (setq key-beginning (+ (match-beginning 0) 1)) ; we found a match
                (setq key-beginning (point)))) ; no match found
              (if (search-backward "," link-string-beginning 1 1)
                  (setq key-beginning (+ (match-beginning 0) 1)) ; we found a match
                (setq key-beginning (point)))) ; no match found