Ver código fonte

org.el (org-tags-expand): Use word delimiters when building the tag search regexp

* org.el (org-tags-expand): Use word delimiters when building
the tag search regexp.

Thanks to Christian Moe for reporting this bug.
Bastien Guerry 12 anos atrás
pai
commit
bccda67ce4
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

@@ -14118,7 +14118,7 @@ When DOWNCASE is non-nil, expand downcased TAGS."
 	    (setq rpl (append (org-uniquify rpl) (assoc tag tal)))
 	    (setq rtnmatch
 		  (replace-match
-		   (concat dir "{" (regexp-opt rpl) "}") t t rtnmatch))))
+		   (concat dir "{\\<" (regexp-opt rpl) "\\>}") t t rtnmatch))))
 	(if single-as-list
 	    (or (reverse rpl) (list rtnmatch))
 	  rtnmatch))