-
Notifications
You must be signed in to change notification settings - Fork 25
/
Copy pathsymex-custom.el
72 lines (56 loc) · 2.25 KB
/
symex-custom.el
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
69
70
71
72
;;; symex-custom.el --- An evil way to edit Lisp symbolic expressions as trees -*- lexical-binding: t -*-
;; URL: https://github.com/countvajhula/symex.el
;; This program is "part of the world," in the sense described at
;; https://drym.org. From your perspective, this is no different than
;; MIT or BSD or other such "liberal" licenses that you may be
;; familiar with, that is to say, you are free to do whatever you like
;; with this program. It is much more than BSD or MIT, however, in
;; that it isn't a license at all but an idea about the world and how
;; economic systems could be set up so that everyone wins. Learn more
;; at drym.org.
;;
;; This work transcends traditional legal and economic systems, but
;; for the purposes of any such systems within which you may need to
;; operate:
;;
;; This is free and unencumbered software released into the public domain.
;; The authors relinquish any copyright claims on this work.
;;
;;; Commentary:
;; User Customization configuration
;;; Code:
(defgroup symex nil
"A language for editing symbolic expressions."
:group 'lisp)
(defcustom symex-highlight-p t
"Whether selected symexes should be highlighted."
:type 'boolean
:group 'symex)
(defcustom symex-refocus-p t
"Whether to refocus on the selected symex when it's near the screen's edge."
:type 'boolean
:group 'symex)
(defcustom symex-remember-branch-positions-p t
"Whether movement in the vertical direction should remember branch positions."
:type 'boolean
:group 'symex)
(defcustom symex-modal-backend 'evil
"Whether to use hydra or evil as the backend for the modal interface."
:type 'symbol
:group 'symex)
(defcustom symex-quote-prefix-list (list "'" "`")
"List of prefixes to cycle through while using `symex-cycle-quote`."
:type 'list
:group 'symex)
(defcustom symex-unquote-prefix-list (list "," ",@")
"List of prefixes to cycle through while using `symex-cycle-unquote`."
:type 'list
:group 'symex)
(defcustom symex-common-lisp-backend 'slime
"Backend provider for Common Lisp interactive features. One of:
- SLIME: The Superior Lisp Interaction Mode for Emacs.
- SLY: Sylvestors Common Lisp IDE for Emacs. A fork of SLIME."
:type 'symbol
:group 'symex)
(provide 'symex-custom)
;;; symex-custom.el ends here