From 43c986bd9dec911bbad585e9183d82130f4ba878 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Wed, 20 Jul 2016 14:32:29 -0700
Subject: [PATCH] repair visibility of `metas` submodule

---
 pollen/private/reader-base.rkt | 14 +++++++++-----
 pollen/private/ts.rktd         |  2 +-
 2 files changed, 10 insertions(+), 6 deletions(-)

diff --git a/pollen/private/reader-base.rkt b/pollen/private/reader-base.rkt
index c8a94d0..5f2c897 100644
--- a/pollen/private/reader-base.rkt
+++ b/pollen/private/reader-base.rkt
@@ -42,15 +42,19 @@
                     [DIRECTORY-REQUIRES (require+provide-directory-require-files path-string)]
                     [SOURCE-LINES source-stx]
                     [DOC (setup:main-export)]
+                    [META-MOD (setup:meta-export)]
                     [PARSER-MODE-FROM-READER parser-mode-from-reader]
                     [POLLEN-MODULE-SYNTAX (let ([mod-stx #'(module POLLEN-MOD-NAME pollen
-                                                               (define-meta HERE-KEY HERE-PATH) 
-                                                               (provide (all-defined-out))
-                                                               DIRECTORY-REQUIRES
-                                                               . SOURCE-LINES)])
+                                                             (define-meta HERE-KEY HERE-PATH) 
+                                                             (provide (all-defined-out))
+                                                             DIRECTORY-REQUIRES
+                                                             . SOURCE-LINES)])
                                             (syntax-property mod-stx 'parser-mode-from-reader parser-mode-from-reader))])
        #'(module runtime-wrapper racket/base
            POLLEN-MODULE-SYNTAX
+           (module META-MOD racket/base
+             (require (submod ".." POLLEN-MOD-NAME META-MOD))
+             (provide (all-from-out (submod ".." POLLEN-MOD-NAME META-MOD))))
            (require (submod pollen/private/runtime-config show) 'POLLEN-MOD-NAME)
            (provide (all-from-out 'POLLEN-MOD-NAME))
            (show DOC 'PARSER-MODE-FROM-READER HERE-PATH))))) ; HERE-PATH acts as "local" runtime config
@@ -83,7 +87,7 @@
             (define my-make-drracket-buttons (dynamic-require 'pollen/private/drracket-buttons 'make-drracket-buttons))
             (my-make-drracket-buttons my-command-char)])]
         [(drracket:indentation)
-            (dynamic-require 'scribble/private/indentation 'determine-spaces)]
+         (dynamic-require 'scribble/private/indentation 'determine-spaces)]
         [else default]))))
 
 (define-syntax-rule (reader-module-begin mode expr-to-ignore ...)
diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd
index 9183278..f928839 100644
--- a/pollen/private/ts.rktd
+++ b/pollen/private/ts.rktd
@@ -1 +1 @@
-1468998858
+1469050349