mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-02 08:22:16 +00:00
Code

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

Browse Source 
* contrib/lisp/org-element.el (org-element-parse-objects): Remove
  empty strings between objects in parse tree.
This commit is contained in:
Nicolas Goaziou 2012-01-08 22:57:53 +01:00
parent f29e6edb90
commit aae20190a3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
contrib/lisp/org-element.el
View File

@ -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))