It looks like patch-acceptance has picked up again recently -- may I humbly bump the fix below? Such a useful helper function, otherwise!
Thanks, Eric > diff --git a/lisp/org.el b/lisp/org.el > index 777850a..ee0b88c 100644 > --- a/lisp/org.el > +++ b/lisp/org.el > @@ -19992,7 +19992,7 @@ clocking lines, and drawers." > "\\|" > "\\([ \t]*\\(" org-keyword-time-regexp "\\)\\)"))) > (forward-line 1) > - (while (looking-at (concat "[ \t]*\\(" org-keyword-time-regexp "\\)")) > + (while (looking-at re) > (if (not (match-end 1)) > ;; empty or planning line > (forward-line 1)