more adjustments to the c:x;r;a keystroke
The goal is to better handle situations like this one: ╔═══╗ ║ - ║ ╚═══╝ where the hyphen should not change. original commit: a0f910c3dcf6ad40971257e9a4bd1b9ca94d3435
This commit is contained in:
parent
3fe3a93c43
commit
dcee0e5cf9
|
@ -26,19 +26,19 @@
|
||||||
#\╩ #\╦ #\╣
|
#\╩ #\╦ #\╣
|
||||||
#\╝ #\╗
|
#\╝ #\╗
|
||||||
#\═
|
#\═
|
||||||
#\+ #\-))
|
#\+ #\- #\=))
|
||||||
|
|
||||||
(define rt-chars
|
(define rt-chars
|
||||||
'(#\╬
|
'(#\╬
|
||||||
#\╩ #\╦ #\╠
|
#\╩ #\╦ #\╠
|
||||||
#\╔ #\╚
|
#\╔ #\╚
|
||||||
#\═
|
#\═
|
||||||
#\+ #\-))
|
#\+ #\- #\=))
|
||||||
|
|
||||||
(define adjustable-chars
|
(define adjustable-chars
|
||||||
(remove-duplicates
|
(remove-duplicates
|
||||||
(append up-chars dn-chars lt-chars rt-chars)))
|
(append up-chars dn-chars lt-chars rt-chars)))
|
||||||
|
|
||||||
(define double-barred-chars
|
(define double-barred-chars
|
||||||
(remove* '(#\+ #\- #\|)
|
(remove* '(#\+ #\- #\= #\|)
|
||||||
adjustable-chars))
|
adjustable-chars))
|
Loading…
Reference in New Issue
Block a user