From f09eaa059c28c3448188846693ae643d3723a237 Mon Sep 17 00:00:00 2001
From: crc <crc@noemail.net>
Date: Wed, 24 Apr 2019 18:35:09 +0000
Subject: [PATCH] make-book: show a progress indicator

FossilOrigin-Name: 2bdcf6a47177c13376518c0d5368d6988fa679e1e9db5dea60f288a8d0e83824
---
 make-book.retro | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/make-book.retro b/make-book.retro
index a5e7510..58b684b 100755
--- a/make-book.retro
+++ b/make-book.retro
@@ -67,7 +67,7 @@ for me.
 :import        here swap BOOK-BASE s:prepend file:slurp ;
 :\n            ASCII:LF @Out file:write ;
 :add-to-book   here [ @Out file:write ] s:for-each \n ;
-:process-files [ import add-to-book ] a:for-each ;
+:process-files [ import add-to-book $. c:put ] a:for-each nl ;
 :open          'RETRO-Book.md file:open<for-writing> !Out ;
 :close         @Out file:close ;
 :assemble      open process-files close ;