diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-10-09 09:53:45 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-10-09 09:53:45 +0200 |
| commit | 75eebb3715850b6fea85a98c1c19dc1a6e38dfb1 (patch) | |
| tree | 83bd7a3444b28d952e6f4f729ed4c802572e08f0 | |
| parent | 05794b13b3de75d6f8989fb00d5bf75fbc19e20a (diff) | |
| download | org-mode-75eebb3715850b6fea85a98c1c19dc1a6e38dfb1.tar.gz | |
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".
| -rw-r--r-- | lisp/org-element.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/org-element.el b/lisp/org-element.el index 7b091bf..1430e3b 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -3114,10 +3114,6 @@ Assume point is at the beginning of the link." ((string-match org-link-types-re raw-link) (setq type (match-string 1 raw-link)) (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. ((and (string-match-p "\\`(" raw-link) (string-match-p ")\\'" raw-link)) |