diff options
| author | Artyom Bologov <git@aartaka.me> | 2026-08-23 17:44:40 +0400 |
|---|---|---|
| committer | Artyom Bologov <git@aartaka.me> | 2026-08-24 00:28:43 +0400 |
| commit | 584f78b103037e8bc6f4b22a6fae23e09f619d6d (patch) | |
| tree | 3c361fa0005a3391dc5cb66c74bdf3a3387e84b0 /elisp | |
| parent | efcf1939fd839e9ea22d68ff0ebbd8ca2e1b71e1 (diff) | |
| download | geiser-584f78b103037e8bc6f4b22a6fae23e09f619d6d.tar.gz geiser-584f78b103037e8bc6f4b22a6fae23e09f619d6d.tar.bz2 | |
Allow more forms as identifier edit locations
Diffstat (limited to 'elisp')
| -rw-r--r-- | elisp/geiser-edit.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/elisp/geiser-edit.el b/elisp/geiser-edit.el index 0c6be2f..d08b570 100644 --- a/elisp/geiser-edit.el +++ b/elisp/geiser-edit.el @@ -93,10 +93,14 @@ or following links in error buffers.") "define*" "define-method" "define-class" - "define-struct"))) + "define-struct" + ;; SRFI 253 + "define-checked"))) (defconst geiser-edit--def-re* - (regexp-opt '("define-syntaxes" "define-values"))) + (regexp-opt '("define-syntaxes" "define-values" + ;; SRFI 273 + "define-values-checked"))) (defsubst geiser-edit--def-re (thing) (let ((sx (regexp-quote (format "%s" thing)))) |