From 3fe3a93c4309eba701bb0873b5db7b4c43b601fb Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Thu, 17 Jan 2013 15:38:15 -0600
Subject: [PATCH] loosen slightly the requirements for changing existing chars
 in the c:x;r;a keystroke

original commit: fce4cbad3a6dcd68b182a7bcf9dd38df2d92356e
---
 collects/framework/private/dir-chars.rkt | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/collects/framework/private/dir-chars.rkt b/collects/framework/private/dir-chars.rkt
index 2c75ae7..e5e195c 100644
--- a/collects/framework/private/dir-chars.rkt
+++ b/collects/framework/private/dir-chars.rkt
@@ -1,6 +1,7 @@
 #lang racket/base
 (require racket/list)
 (provide adjustable-chars
+         double-barred-chars
          up-chars
          dn-chars
          lt-chars
@@ -36,4 +37,8 @@
 
 (define adjustable-chars
   (remove-duplicates
-   (append up-chars dn-chars lt-chars rt-chars)))
\ No newline at end of file
+   (append up-chars dn-chars lt-chars rt-chars)))
+
+(define double-barred-chars
+  (remove* '(#\+ #\- #\|) 
+           adjustable-chars))
\ No newline at end of file