suzanne.soy/2d
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

loosen slightly the requirements for changing existing chars

Browse Source 
in the c:x;r;a keystroke

original commit: fce4cbad3a6dcd68b182a7bcf9dd38df2d92356e
This commit is contained in:
Robby Findler 2013-01-17 15:38:15 -06:00
parent 0bd74f1302
commit 3fe3a93c43
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/framework/private/dir-chars.rkt
View File

@ -1,6 +1,7 @@
#lang racket/base #lang racket/base
(require racket/list) (require racket/list)
(provide adjustable-chars (provide adjustable-chars
double-barred-chars
up-chars up-chars
dn-chars dn-chars
lt-chars lt-chars
@ -36,4 +37,8 @@
(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
(remove* '(#\+ #\- #\|)
adjustable-chars))