88 lines
732 B
Common Lisp
88 lines
732 B
Common Lisp
;; Bépo Windows/Linux aliases
|
|
|
|
;; Navigation layer
|
|
(defalias
|
|
|
|
all C-a
|
|
sav C-k
|
|
cls C-]
|
|
ndo C-[
|
|
cut C-c
|
|
cpy C-h
|
|
pst C-u
|
|
|
|
0 S-0
|
|
1 S-1
|
|
2 S-2
|
|
3 S-3
|
|
4 S-4
|
|
5 S-5
|
|
6 S-6
|
|
7 S-7
|
|
8 S-8
|
|
9 S-9
|
|
, g
|
|
. v
|
|
)
|
|
|
|
;; Symbols layer
|
|
(defalias
|
|
|
|
^ AG-6
|
|
< AG-2
|
|
> AG-3
|
|
$ `
|
|
% =
|
|
@ 6
|
|
& AG-e
|
|
* 0
|
|
' AG-g
|
|
` S-=
|
|
|
|
{ AG-x
|
|
pl 4
|
|
pr 5
|
|
} AG-c
|
|
= -
|
|
\ AG-z
|
|
+ 7
|
|
- 8
|
|
/ AG-<
|
|
'' 1
|
|
|
|
~ AG-b
|
|
[ AG-4
|
|
] AG-5
|
|
_ AG-spc
|
|
# S-`
|
|
| AG-q
|
|
! S-y
|
|
; S-g
|
|
: S-v
|
|
? S-n
|
|
)
|
|
|
|
;; NumRow layer
|
|
(defalias
|
|
|
|
s0 0
|
|
s1 1
|
|
s2 2
|
|
s3 3
|
|
s4 4
|
|
s5 5
|
|
s6 6
|
|
s7 7
|
|
s8 8
|
|
s9 9
|
|
nbs S-spc ;; narrow no-break space
|
|
|
|
dk1 XX
|
|
dk2 XX
|
|
dk3 XX
|
|
dk4 XX
|
|
dk5 XX
|
|
)
|
|
|
|
;; vim: set ft=lisp:
|