summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--smart-documents.org18
1 files changed, 13 insertions, 5 deletions
diff --git a/smart-documents.org b/smart-documents.org
index 88c79d7..11a8889 100644
--- a/smart-documents.org
+++ b/smart-documents.org
@@ -1514,7 +1514,8 @@ PDF. The binding is defined in Section [[Export to PDF]].
#+END_SRC
-**** COMMENT For Org mode, specifically
+
+**** TODO COMMENT For Org mode, specifically
#+BEGIN_SRC emacs-lisp :tangle yes
(defun sd-org-fix-headlines-spacing ()
@@ -1522,13 +1523,20 @@ PDF. The binding is defined in Section [[Export to PDF]].
(save-excursion
(progn
(goto-char (point-min))
- (mark-whole-buffer)
- (delete-blank-lines)
- (org-next-visible-heading)
- (re-search-backward "^$")))
+ (flush-lines "^[[:space:]]*$")
+ (while (re-search-forward "^*" nil t)
+ (beginning-of-line)
+ (newline 2)
+ (next-line)
+ (newline))))
#+END_SRC
+
** Smart quitting
+:PROPERTIES:
+:test: t
+:END:
+
*** Window
Copyright 2019--2024 Marius PETER