.

original commit: b1f3ddd8b403aca02de9a885a22bfc45c2461d28

collects/framework/private/scheme.ss

@@ -408,7 +408,8 @@
           (define (get-limit pos) 0)
           
           (define (balance-parens key-event)
-            (insert-close-paren (get-start-position) (send key-event get-key-code)
+            (insert-close-paren (get-start-position) 
+                                (send key-event get-key-code)
                                 (preferences:get 'framework:paren-match)
                                 (preferences:get 'framework:fixup-parens)))
           

collects/framework/private/text.ss

@@ -1471,8 +1471,7 @@ WARNING: printf is rebound in the body of the unit to always
 
       (define input-box<%>
         (interface ((class->interface text%))
-          box-input-not-used-anymore
-          set-port-text))
+          ))
       
       (define input-box-mixin
         (mixin ((class->interface text%)) (input-box<%>)