From 40ed4c0e8784d6b7769a2aba19dba0d80431e639 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Thu, 22 Oct 2009 23:24:40 +0000 Subject: [PATCH] svn: r16417 --- collects/syntax-color/module-lexer.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/syntax-color/module-lexer.ss b/collects/syntax-color/module-lexer.ss index d4c1f69840..9877b5f0a1 100644 --- a/collects/syntax-color/module-lexer.ss +++ b/collects/syntax-color/module-lexer.ss @@ -19,8 +19,8 @@ (eq? (car g) 'planet)) (error "#lang planet disbled") (old g))))]) - ;; FIXME: set the reader guard to disable access to - ;; untrusted planet packages. + ;; FIXME: do something so that we don't + ;; have to disable all planet packages. (read-language p (lambda () #f))))] [sync-ports (lambda () (read-bytes (- (file-position p) init) in))])