newlines at EOFs

svn: r13105

original commit: d1a0086471bf5e9553a9b056b26286c427831d38

collects/framework/private/comment-box.ss

@@ -122,4 +122,4 @@
         (make-special-comment "comment"))
       (super-instantiate ())
       (inherit set-snipclass)
-      (set-snipclass snipclass))))
+      (set-snipclass snipclass))))

collects/framework/private/search.ss

@@ -96,4 +96,4 @@
                  (if (not embedded-pos)
                      (next-loop)
                      (values embedded embedded-pos)))]
-              [else (next-loop)])))))))
+              [else (next-loop)])))))))

collects/framework/private/sig.ss

@@ -465,4 +465,4 @@
      (open (prefix frame: frame^))
      (open (prefix handler: handler^))
      (open (prefix scheme: scheme^))
-     (open (prefix main: main^))))
+     (open (prefix main: main^))))

collects/mrlib/close-icon.ss

@@ -118,4 +118,4 @@
   (define f (new frame% [label "test"]))
   (define c (new close-icon% [parent f] [callback (λ () (printf "hi\n"))]))
   (define gb (new grow-box-spacer-pane% [parent f]))
-  (send f show #t))
+  (send f show #t))