diff --git a/collects/framework/private/scheme.ss b/collects/framework/private/scheme.ss index 2404f4c5..d2b148ee 100644 --- a/collects/framework/private/scheme.ss +++ b/collects/framework/private/scheme.ss @@ -883,12 +883,10 @@ forward-cache))] [define remove-sexp (lambda (start-pos) - (begin-edit-sequence) (let ([end-pos (get-forward-sexp start-pos)]) (if end-pos (kill 0 start-pos end-pos) (bell))) - (end-edit-sequence) #t)] [define forward-sexp (lambda (start-pos)