From e26410cc6d8c30947f35453ee9a8e2f77d02885d Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Fri, 21 Aug 2015 08:03:52 -0700
Subject: [PATCH] code typo

---
 main-base.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/main-base.rkt b/main-base.rkt
index efe1c87..4c9203e 100644
--- a/main-base.rkt
+++ b/main-base.rkt
@@ -21,8 +21,8 @@
               (require INNER 'inner) ; import inner twice: INNER for external use, 'inner for internal
               
               (define DOC
-                (let* ([parser-mode-defined? (procedure? inner:parser-mode)] ; if not defined, #%top makes it a procedure
-                       [parser-mode (if parser-mode-defined?
+                (let* ([parser-mode-undefined? (procedure? inner:parser-mode)] ; if undefined, #%top makes it a procedure
+                       [parser-mode (if parser-mode-undefined?
                                         MODE-ARG
                                         inner:parser-mode)]
                        [proc (cond