From 3fcd3c04d54573c0f8fcca43d4b2e356b9a4b0b8 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Wed, 28 Dec 2011 21:06:22 -0500 Subject: [PATCH] Minor typo in recent new regexp. --- collects/net/unihead.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/net/unihead.rkt b/collects/net/unihead.rkt index 7dd39246d8..43d6107c5e 100644 --- a/collects/net/unihead.rkt +++ b/collects/net/unihead.rkt @@ -7,7 +7,7 @@ (define (encode-for-header s) (cond [(not (regexp-match? re:non-ascii s)) s] - [(not (regexp-match? #rx"\r\n" s)) (encode-line-for-header s)] ; speed + [(not (regexp-match? #rx"[\r\n]" s)) (encode-line-for-header s)] ; speed [else (regexp-replace* #rx"[^\r\n]+" s encode-line-for-header)])) ;; Note: the following two encoder wrappers remove newlines from the