1 files changed, 11 insertions, 5 deletions

@@ -314,12 +314,18 @@ instead of the true count."
 
 ;;; Hooks & Advice
 
+(defvar +org-before-save-prettify-buffer t
+  "Prettify org buffers before saving.")
+
+(put '+org-before-save-prettify-buffer 'safe-local-variable #'booleanp)
+
 (defun +org-before-save@prettify-buffer ()
-  (save-mark-and-excursion
-    (mark-whole-buffer)
-    ;;(org-fill-paragraph nil t)
-    (+org-fix-blank-lines t)
-    (org-align-tags t)))
+  (when +org-before-save-prettify-buffer
+    (save-mark-and-excursion
+     (mark-whole-buffer)
+     ;;(org-fill-paragraph nil t)
+     (+org-fix-blank-lines t)
+     (org-align-tags t))))
 
 (defun +org-delete-backward-char (N)
   "Keep tables aligned while deleting N characters backward.