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:
Robby Findler 2013-01-21 20:24:30 -06:00
parent 3fe3a93c43
commit dcee0e5cf9

View File

@ -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))