Commit 3809f093 authored by Erik Hetzner's avatar Erik Hetzner

Fix org-zotxt-update-all-reference-links

org-element-successor-link is gone
parent e870fed8
......@@ -106,17 +106,14 @@ prefix argument (C-u C-u) to `org-zotxt-insert-reference-link'"
"Update all zotero:// links in a document."
(goto-char (point-min))
(let ((next-link (org-element-link-successor)))
(while (not (null next-link))
(goto-char (cdr next-link))
(let* ((parse (org-element-link-parser))
(path (org-element-property :path parse))
(end (org-element-property :end parse)))
(if (org-zotxt-extract-link-id-from-path path)
(goto-char end))
(setq next-link (org-element-link-successor))))))
(goto-char (point-max))
(while (re-search-backward org-any-link-re nil t)
(let* ((parse (org-element-link-parser))
(path (org-element-property :path parse)))
(when (org-zotxt-extract-link-id-from-path path)
(message "[zotxt] updating path: %s" path)
(defun org-zotxt-get-item-link-text-deferred (item)
"Get the link text for ITEM.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment