Fix org-format so that it works for non-file buffers

This commit is contained in:
Chris Barrett
2023-12-26 14:24:42 +13:00
parent 0a6634df27
commit 421a332373

View File

@@ -131,11 +131,10 @@ Only applies to level-1 headings in the document."
"Format the current `org-mode' buffer." "Format the current `org-mode' buffer."
(interactive) (interactive)
(unless (org-capture-detect) (unless (org-capture-detect)
(let ((scope (if (org-format--in-archived-heading-p) (let ((scope (when (org-format--in-archived-heading-p)
;; archive files can be enormous--just format the heading at ;; archive files can be enormous--just format the heading at
;; point after archiving. ;; point after archiving.
'tree 'tree)))
'file)))
(org-with-wide-buffer (org-with-wide-buffer
(when org-format-align-all-tables (when org-format-align-all-tables