feat(g/emacs): Add template for work org files
This includes an attempt at making this work with auto-insert, but that didn't seem to have any effect - can just call it manually now Change-Id: I0eac267b7d3387efd84a2dd0d32b1364fa06f328 Reviewed-on: https://cl.tvl.fyi/c/depot/+/563 Reviewed-by: glittershark <grfn@gws.fyi>
This commit is contained in:
parent
368e8d1edd
commit
9ead20ef9f
2 changed files with 35 additions and 0 deletions
|
|
@ -90,3 +90,16 @@ Returns nil if the regex did not match, non-nil otherwise"
|
|||
,@body
|
||||
(evil-indent beg (+ (line-end-position) 1))))
|
||||
(goto-line-char orig-line-char)))
|
||||
|
||||
(pcase-defmacro s-starts-with (prefix)
|
||||
`(pred (s-starts-with-p ,prefix)))
|
||||
|
||||
(pcase-defmacro s-contains (needle &optional ignore-case)
|
||||
`(pred (s-contains-p ,needle
|
||||
,@(when ignore-case (list ignore-case)))))
|
||||
|
||||
(comment
|
||||
(pcase "foo"
|
||||
((s-contains "bar") 1)
|
||||
((s-contains "o") 2))
|
||||
)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue