update packages
This commit is contained in:
@@ -1,6 +1,6 @@
|
||||
;;; org-ref-ref-links.el --- cross-reference links for org-ref -*- lexical-binding: t; -*-
|
||||
;;
|
||||
;; Copyright (C) 2021 John Kitchin
|
||||
;; Copyright (C) 2021-2024 John Kitchin
|
||||
|
||||
;; Author: John Kitchin <jkitchin@andrew.cmu.edu>
|
||||
;; Keywords: convenience
|
||||
@@ -162,8 +162,7 @@ font-lock."
|
||||
(rx (string-join org-ref-ref-label-regexps "\\|"))
|
||||
(labels '())
|
||||
oe ;; org-element
|
||||
context
|
||||
data)
|
||||
context)
|
||||
(save-excursion
|
||||
(org-with-wide-buffer
|
||||
(goto-char (point-min))
|
||||
@@ -221,7 +220,7 @@ font-lock."
|
||||
(when (string= label (match-string-no-properties 1))
|
||||
(save-match-data (org-mark-ring-push))
|
||||
(goto-char (match-beginning 1))
|
||||
(org-show-entry)
|
||||
(org-fold-show-entry)
|
||||
(substitute-command-keys
|
||||
"Go back with (org-mark-ring-goto) \`\\[org-mark-ring-goto]'.")
|
||||
(throw 'found t)))))))
|
||||
@@ -347,8 +346,7 @@ This is meant to be used with `apply-partially' in the link definitions."
|
||||
|
||||
;; in a latex environment
|
||||
((equal (org-element-type object) 'latex-environment)
|
||||
(let ((value (org-element-property :value object))
|
||||
label)
|
||||
(let ((value (org-element-property :value object)))
|
||||
(when (string-match "\\\\label{\\(?1:[+a-zA-Z0-9:\\._-]*\\)}" value)
|
||||
(match-string-no-properties 1 value))))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user