From d472b48f5795eb438f2c6e0798922db200e87e1c Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Sun, 5 Nov 2017 14:00:19 -0800 Subject: [PATCH] nit --- pollen/cache.rkt | 4 ++-- pollen/private/ts.rktd | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/pollen/cache.rkt b/pollen/cache.rkt index 281dafd..a7a88ec 100644 --- a/pollen/cache.rkt +++ b/pollen/cache.rkt @@ -1,5 +1,6 @@ #lang racket/base (require racket/file + racket/list sugar/define "private/cache-utils.rkt" "private/debug.rkt" @@ -10,8 +11,7 @@ (define (cache-directory? path) (and (directory-exists? path) - (member (path->string (for/last ([p (in-list (explode-path path))]) - p)) default-cache-names))) + (member (path->string (last (explode-path path))) default-cache-names))) (define+provide (reset-cache [starting-dir (current-project-root)]) (unless (and (path-string? starting-dir) (directory-exists? starting-dir)) diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd index 7fd0882..a9ff399 100644 --- a/pollen/private/ts.rktd +++ b/pollen/private/ts.rktd @@ -1 +1 @@ -1509918830 +1509919219