mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-29 22:47:56 +00:00
org-element: Small refactoring
* lisp/org-element.el (org-element-link-parser): Remove useless cond branch. "id" links are handled by the previous branch, i.e., "explicit types".
This commit is contained in:
parent
05794b13b3
commit
75eebb3715
|
@ -3114,10 +3114,6 @@ Assume point is at the beginning of the link."
|
||||||
((string-match org-link-types-re raw-link)
|
((string-match org-link-types-re raw-link)
|
||||||
(setq type (match-string 1 raw-link))
|
(setq type (match-string 1 raw-link))
|
||||||
(setq path (substring raw-link (match-end 0))))
|
(setq path (substring raw-link (match-end 0))))
|
||||||
;; Id type: PATH is the id.
|
|
||||||
((string-match "\\`id:\\([-a-f0-9]+\\)\\'" raw-link)
|
|
||||||
(setq type "id")
|
|
||||||
(setq path (match-string 1 raw-link)))
|
|
||||||
;; Code-ref type: PATH is the name of the reference.
|
;; Code-ref type: PATH is the name of the reference.
|
||||||
((and (string-match-p "\\`(" raw-link)
|
((and (string-match-p "\\`(" raw-link)
|
||||||
(string-match-p ")\\'" raw-link))
|
(string-match-p ")\\'" raw-link))
|
||||||
|
|
Loading…
Reference in a new issue