newlines at EOFs

svn: r13105

collects/scheme/private/map.ss

@@ -127,4 +127,3 @@
                  (ormap f l1 l2))]
             [(f . args) (apply ormap f args)])])
       ormap)))
-  

collects/tests/typed-scheme/succeed/hw01.scm

@@ -108,4 +108,3 @@
   (= 0 (list-length '()))
   (= 2 (list-length '(1 2)))
   (= 3 (list-length '(1 2 (1 2 3 4))))
-  

collects/typed/net/base64.ss

@@ -10,4 +10,3 @@
   [base64-decode (Bytes -> Bytes)])
 
 (provide base64-encode-stream base64-decode-stream base64-encode base64-decode)
-  

collects/typed/net/pop3.ss

@@ -40,5 +40,3 @@
 (require-typed-struct/provide (malformed-server-response pop3) 
 			      ([communicator : communicator]) net/pop3) 
 
-
-  

collects/typed/net/qp.ss

@@ -7,4 +7,3 @@
   [qp-decode ( String -> String )]
   [qp-encode-stream (case-lambda (Input-Port Output-Port -> Void) (Input-Port Output-Port String -> Void) )]
   [qp-decode-stream ( Input-Port Output-Port -> Void )])
-  

collects/typed/net/sendmail.ss

@@ -9,4 +9,3 @@
    (String String (Listof String) (Listof String) (Listof String) (Listof String) String * -> Output-Port)])
   
 (provide send-mail-message/port send-mail-message #;no-mail-recipients)
-  

collects/typed/net/sendurl.ss

@@ -6,4 +6,3 @@
 	       [external-browser  (-> (U Symbol #f (Pair String String)))])
 
 (provide send-url unix-browser-list browser-preference? external-browser)
-  

collects/typed/net/smtp.ss

@@ -7,5 +7,3 @@
   [smtp-sending-end-of-message (Parameter (-> Any))])
   
 (provide smtp-send-message smtp-sending-end-of-message)
-  
-  

collects/typed/net/uri-codec.ss

@@ -12,4 +12,3 @@
   [alist->form-urlencoded ( (Listof (cons Symbol String)) -> String )]
   [form-urlencoded->alist ( String -> (Listof (cons Symbol String)) )]
   [current-alist-separator-mode (Parameter Symbol)])
-