From 91ff86327d6f995675fdddd81b8a4c6e8f09d7bc Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Thu, 6 Feb 2014 09:33:24 -0800
Subject: [PATCH] change name of render-with-session to render-batch

---
 command.rkt | 2 +-
 render.rkt  | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/command.rkt b/command.rkt
index 016efba..6704790 100644
--- a/command.rkt
+++ b/command.rkt
@@ -20,7 +20,7 @@ polcom [filename] (renders individual file)")]
                                         ;; todo: take extensions off the comand line
                                         (displayln "Render preproc & ptree files ...")
                                         (require "render.rkt" "file-tools.rkt" "world.rkt")
-                                        (apply render-with-session (append-map project-files-with-ext (list PREPROC_SOURCE_EXT PTREE_SOURCE_EXT))))]
+                                        (apply render-batch (append-map project-files-with-ext (list PREPROC_SOURCE_EXT PTREE_SOURCE_EXT))))]
                      [("clone") (let ([target-path 
                                        (if (> (len args) 1)
                                            (->path (get args 1))
diff --git a/render.rkt b/render.rkt
index 78be2b8..4decf7f 100644
--- a/render.rkt
+++ b/render.rkt
@@ -4,7 +4,7 @@
 
 (module+ test (require rackunit))
 
-(provide render render-with-session)
+(provide render render-batch)
 
 ;; for shared use by eval & system
 (define nowhere-port (open-output-nowhere))
@@ -91,7 +91,7 @@
 
 
 ;; convenience function for external modules to use
-(define/contract (render-with-session . xs)
+(define/contract (render-batch . xs)
   (() #:rest (listof pathish?) . ->* . void?)
   ;; This will trigger rendering of all files.
   ;; Why not pass #:force #t through with render?