Skip to content

Instantly share code, notes, and snippets.

(defvar EITBW/ontos
'((world-system "61776D45-034D-441D-B306-30925F674126")
(paidea "902f5a3b-3db3-4d36-89d8-6e86179f0862")
(identity-formation "6E3E56A6-9198-4BF6-A34B-E07D46292D47")
(technology "0822AA89-0FC3-4F6C-844C-79D3067018C1")
(education "7C455BF6-9B6E-45D8-824B-96B3DDCFA73D")))
(defun x-open-me ()
"open a file, using current line as file name/path"

zzzz

zzzz-zz zzzzzzz

zzzz-zz-zz zzzzzzzzz

zzzzzz

#+zzzzzzzzzzz z zzzzzzz zzzz zzzzzzzzz. z zzzz zzzzzz zzzzzzzzzz zz zzzz zz zzz zzzzzzzzz. #+zzzzzzzzz

zzzzz

zzzz-zz-zz zzzzzzzz

@(bind foo @(regex-compile '(compound
(or "y" "b")
"ears")))
Four@\ score@\ and
seven @{units foo} ago
our @relatives brought forth,
@(eof)
@(output)
@{units} of @relatives
@(end)