fix c:c;c:b so it removes {}s

closes PR 13211 original commit: 316bbcb038bc1472c71b4bdd58972e86a3776c30
2012-11-22 10:25:57 -06:00 · 2012-11-22 10:25:57 -06:00 · 3fdd763928
commit 3fdd763928
parent 469e4203dc
1 changed files with 3 additions and 2 deletions
--- a/collects/framework/private/racket.rkt
+++ b/collects/framework/private/racket.rkt
@ -1033,8 +1033,9 @@
      (λ (start-pos)
        (let* ([pos (skip-whitespace start-pos 'forward #f)]
               [first-char (get-character pos)]
-               [paren? (or (char=? first-char #\( )
-                           (char=? first-char #\[ ))]
+               [paren? (or (char=? first-char #\()
+                           (char=? first-char #\[)
+                           (char=? first-char #\{))]
               [closer (and paren? 
                            (get-forward-sexp pos))])
          (if (and paren? closer)