branch: externals/org-real commit 3e325b3e3205aa25efde6e0093ff01d9aec58507 Author: Tyler Grinn <tylergr...@gmail.com> Commit: Tyler Grinn <tylergr...@gmail.com>
Simplified merge function --- org-real.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/org-real.el b/org-real.el index 588b3e6..557b689 100644 --- a/org-real.el +++ b/org-real.el @@ -224,11 +224,9 @@ If EXCLUDE-CHILDREN, only retrieve sibling boxes." (if (= 0 (length boxes)) (org-real--box) (car boxes)) - (let ((world (org-real--box)) - box) + (let ((world (org-real--box))) (while boxes - (setq box (pop boxes)) - (org-real--merge-into box world)) + (org-real--merge-into (pop boxes) world)) world))) (defun org-real--expand (box)