escriba 0.1.20

The escriba editor binary. Composes every escriba-* crate via madori's app loop + garasu's GPU stack.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68

;; escriba sample rc — exercises every form `escriba-lisp` supports
;; today. Point the editor at it:
;;
;;   escriba --rc escriba/examples/sample-rc.lisp --list-rc
;;
;; The binary loads this in read-only mode and reports what it
;; would apply. Point the editor at this for real with
;;
;;   escriba --rc escriba/examples/sample-rc.lisp --render=text <file>
;;
;; to see a single-frame render using this config.

;; ── Keybindings ───────────────────────────────────────────────────
;; Re-bind normal-mode h to move right (the canonical joke) so
;; `--list-rc` proves the rc is actually being applied.
(defkeybind :mode "normal" :key "h" :action "move-right")
;; A well-known typed-variant action.
(defkeybind :mode "normal" :key "<C-q>" :action "quit")
;; Unknown action — will defer to the command registry at
;; dispatch time.
(defkeybind :mode "normal" :key "<C-p>" :action "picker.files"
            :description "open the file picker")

;; ── Theme ─────────────────────────────────────────────────────────
(deftheme :preset "nord")

;; ── Options ───────────────────────────────────────────────────────
(defoption :name "number"          :value "true")
(defoption :name "relativenumber"  :value "true")
(defoption :name "tabstop"         :value "4")

;; ── Commands ──────────────────────────────────────────────────────
(defcmd :name "write-all"
        :description "Write every modified buffer"
        :action "buffer.write-all")

;; ── Hooks ─────────────────────────────────────────────────────────
(defhook :event "BufWritePost" :command "run-formatter")
(defhook :event "ModeChanged"  :to "insert"
         :command "highlight-cursor-line")

;; ── Filetypes ─────────────────────────────────────────────────────
(defft :ext "rs"   :mode "rust")
(defft :ext "py"   :mode "python")
(defft :ext "lisp" :mode "lisp")

;; ── Major modes ───────────────────────────────────────────────────
;; `defmode` is the richer form — extensions + tree-sitter lang +
;; comment string + indent + optional paredit-grade motions. Matches
;; emacs `define-derived-mode` and neovim `ftplugin` in one.
(defmode :name "rust"
         :extensions ("rs")
         :tree-sitter "rust"
         :commentstring "// %s"
         :indent 4)
(defmode :name "lisp"
         :extensions ("lisp" "cl" "el")
         :tree-sitter "commonlisp"
         :commentstring ";; %s"
         :indent 2
         :structural-lisp #t)

;; ── Abbreviations + snippets ──────────────────────────────────────
(defabbrev :trigger "teh" :expansion "the")
(defsnippet :trigger "fn"
            :body "fn ${1:name}(${2}) -> ${3} { ${0} }"
            :filetype "rust"
            :description "rust function boilerplate")