.

original commit: b1f3ddd8b403aca02de9a885a22bfc45c2461d28

collects/framework/private/keymap.ss

@@ -997,7 +997,7 @@
 	      (map-meta "\"" "insert-\"\"-pair")
 	      (map-meta "|" "insert-||-pair")
 	      (map-meta "s:l" "insert-lambda-template")
-              
+
 	      (map "c:p" "previous-line")
 	      (map "up" "previous-line")
 	      (map "s:c:p" "select-up")

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