From edbf31f2672a1bc052dbcd534c00f1d2815f5ec2 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Thu, 30 Nov 2017 11:41:52 -0800
Subject: [PATCH] slow learner

---
 pollen/private/runtime-config.rkt | 4 ++--
 pollen/private/ts.rktd            | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/pollen/private/runtime-config.rkt b/pollen/private/runtime-config.rkt
index 3ddb988..8170e38 100644
--- a/pollen/private/runtime-config.rkt
+++ b/pollen/private/runtime-config.rkt
@@ -15,8 +15,8 @@
           ;; #:newline option for `pretty-print` was introduced in 6.6.0.3,
           ;; so trim trailing newline manually
           (let ([pretty-print-proc (if (version<? (version) "6.7")
-                                       (λ (x) (print (string-trim #:left? #f (with-output-to-string (λ () (pretty-print x))) "\n")))
-                                       (λ (x) (pretty-print #:newline #f x)))])
+                                       (λ (x) (display (string-trim #:left? #f (with-output-to-string (λ () (pretty-print x))) "\n")))
+                                       (λ (x) (pretty-print #:newline? #f x)))])
             ;; OK to use dynamic-require because runtime-config itself is dynamic-required
             (pretty-print-proc (with-handlers ([exn:fail? (λ (exn) ((error '|pollen markup error|
                                                                            ((dynamic-require 'racket/string 'string-join) (cdr ((dynamic-require 'racket/string 'string-split) (exn-message exn) ": ")) ": "))))])
diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd
index c09bdb7..8a4f971 100644
--- a/pollen/private/ts.rktd
+++ b/pollen/private/ts.rktd
@@ -1 +1 @@
-1512070559
+1512070912