소스 검색

org-element: Fix `org-element-map' when type looked after is plain text

* contrib/lisp/org-element.el (org-element-map): Fix `org-element-map'
  when type looked after is plain text.
Nicolas Goaziou 13 년 전
부모
커밋
cf8d979d8c
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      contrib/lisp/org-element.el

+ 2 - 1
contrib/lisp/org-element.el

@@ -3341,7 +3341,8 @@ Nil values returned from FUN do not appear in the results."
 	  (catch 'found
 	    (let ((category 'greater-elements))
 	      (mapc (lambda (type)
-		      (cond ((memq type org-element-all-objects)
+		      (cond ((or (memq type org-element-all-objects)
+				 (eq type 'plain-text))
 			     ;; If one object is found, the function
 			     ;; has to recurse into every object.
 			     (throw 'found 'objects))