diff --git a/lisp/org.el b/lisp/org.el index f8c83ebe5..dbd2cb700 100755 --- a/lisp/org.el +++ b/lisp/org.el @@ -15730,8 +15730,7 @@ strings." (if p (setcdr p (concat value " " (cdr p))) (push (cons key value) props)))))))))))) (unless (assoc "CATEGORY" props) - (goto-char beg) - (push (cons "CATEGORY" (org-get-category)) props) + (push (cons "CATEGORY" (org-get-category beg)) props) (when (string= specific "CATEGORY") (throw 'exit props))) ;; Return value. (append (get-text-property beg 'org-summaries) props))))))