diff --git a/scheme/httpd/surflets/web-server/root/surflets/news.scm b/scheme/httpd/surflets/web-server/root/surflets/news.scm
index 1f794ed..3ee1e81 100644
--- a/scheme/httpd/surflets/web-server/root/surflets/news.scm
+++ b/scheme/httpd/surflets/web-server/root/surflets/news.scm
@@ -1,18 +1,15 @@
 (define-structure servlet servlet-interface
   (open scheme-with-scsh
-	servlets
-	crlf-io)
+	servlets)
   (begin
     (define *data* '())
     
     (define (read-data)
       (let ((news-input (open-input-file "news.txt")))
-	(let loop ((next-line (read-crlf-line news-input)))
-	  (if (eof-object? next-line)
-	      (close news-input)
-	      (begin
-		(set! *data* (cons next-line *data*))
-		(loop (read-crlf-line news-input)))))))
+	(do ((next-line (read-line news-input)
+			(read-line news-input)))
+	    ((eof-object? next-line) (close news-input))
+	  (set! *data* (cons next-line *data*)))))
       
     (define (main req)
       (if (null? *data*) (read-data))