소스 검색

org-element: Remove empty strings between objects in parse tree

* contrib/lisp/org-element.el (org-element-parse-objects): Remove
  empty strings between objects in parse tree.
Nicolas Goaziou 13 년 전
부모
커밋
aae20190a3
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      contrib/lisp/org-element.el

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

@@ -3116,7 +3116,7 @@ allowed in the current object."
 	(setq next-object (funcall get-next-object candidates))
 	;; 1. Text before any object.
 	(let ((obj-beg (org-element-get-property :begin next-object)))
-	  (unless (= beg obj-beg)
+	  (unless (= (point) obj-beg)
 	    (push (buffer-substring-no-properties (point) obj-beg) acc)))
 	;; 2. Object...
 	(let ((obj-end (org-element-get-property :end next-object))