From 71ccd7334e6a2192ff109a48b856041bfbe6fcfe Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 14 Dec 2007 21:26:24 +0000
Subject: [PATCH] syntax colorer: scheme whitespace is any whitespace

svn: r8011
---
 collects/syntax-color/scheme-lexer.ss | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/collects/syntax-color/scheme-lexer.ss b/collects/syntax-color/scheme-lexer.ss
index 69d9ecfc6a..956bf4a4ef 100644
--- a/collects/syntax-color/scheme-lexer.ss
+++ b/collects/syntax-color/scheme-lexer.ss
@@ -43,7 +43,8 @@
 
    [langchar (:or (:/ "az" "AZ" "09") "+" "-" "_")]
 
-   [scheme-whitespace (:or #\newline #\return #\tab #\space #\vtab #\page)]
+   [scheme-whitespace whitespace]
+
    [line-comment (:: ";" (:* (:~ #\newline)))]