summaryrefslogtreecommitdiffstatshomepage
path: root/nroam-utils.el
diff options
context:
space:
mode:
Diffstat (limited to 'nroam-utils.el')
-rw-r--r--nroam-utils.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/nroam-utils.el b/nroam-utils.el
index e94bdff..a4e58fc 100644
--- a/nroam-utils.el
+++ b/nroam-utils.el
@@ -34,6 +34,16 @@
(let ((inhibit-read-only t))
(unless (eq ?\n (char-before (1- (point)))) (insert "\n"))))
+(defun nroam--insert-heading (level title &optional tags)
+ "Insert a section heading"
+ (let ((pos (point))
+ (stars (make-string level ?*)))
+ (insert stars " " title "\n")
+ (when tags
+ (save-excursion
+ (goto-char pos)
+ (org-set-tags tags)))))
+
(defun nroam--do-separated-by-newlines (function sequence)
"Apply FUNCTION to each element of SEQUENCE.
Insert a single newline between each call to FUNCTION."