diff --git a/lisp/org.el b/lisp/org.el index e588927fb..4b7830b1f 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -8730,9 +8730,9 @@ there is one, return it." ((not (string-match org-link-bracket-re l)) (princ (format "[%c] %s\n" (cl-incf cnt) (org-unbracket-string "<" ">" l)))) - ((match-end 3) + ((match-end 2) (princ (format "[%c] %s (%s)\n" (cl-incf cnt) - (match-string 3 l) (match-string 1 l)))) + (match-string 2 l) (match-string 1 l)))) (t (princ (format "[%c] %s\n" (cl-incf cnt) (match-string 1 l))))))) (org-fit-window-to-buffer (get-buffer-window "*Select Link*"))