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

closes PR 13211
This commit is contained in:
Robby Findler 2012-11-22 10:25:57 -06:00
parent 4f27df3179
commit 316bbcb038

View File

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