mirror of
https://github.com/foo-dogsquared/nixos-config.git
synced 2025-04-25 12:19:12 +00:00
14 lines
351 B
Plaintext
14 lines
351 B
Plaintext
|
# -*- mode: snippet -*-
|
||
|
|
# name: Org-Mode header
|
||
|
|
# key: header
|
||
|
|
# --
|
||
|
|
`(let* ((headerlevel (cl-gcd (read-number "What is the header level?: ")))
|
||
|
|
(str ""))
|
||
|
|
(if (= headerlevel 1)
|
||
|
|
(setq str (concat str (s-repeat 4 "\n")))
|
||
|
|
(setq str (concat str (s-repeat 2 "\n"))))
|
||
|
|
(setq str (concat str (make-string headerlevel ?*)))
|
||
|
|
str)` ${1:<HEADER>}
|
||
|
|
|
||
|
|
$0
|