Parcourir la source

Merge branch 'maint'

Bastien Guerry il y a 13 ans
Parent
commit
60b13f3dfe
1 fichiers modifiés avec 2 ajouts et 1 suppressions
  1. 2 1
      lisp/org-exp.el

+ 2 - 1
lisp/org-exp.el

@@ -2119,7 +2119,8 @@ Also, store forced alignment information found in such lines."
       (put-text-property (match-beginning 0) (match-end 0) 'org-normalized-link t))
     (goto-char (point-min))
     (while (re-search-forward re-plain-link nil t)
-      (unless (get-text-property (match-beginning 0) 'org-normalized-link)
+      (unless (or (get-text-property (match-beginning 0) 'org-normalized-link)
+		  (assoc :tags (org-context)))
 	(goto-char (1- (match-end 0)))
 	(org-if-unprotected-at (1+ (match-beginning 0))
 	  (let* ((s (concat (match-string 1)