From 2fe9d8029e382aa0a9891f9b0846fa2f5033f1a4 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Wed, 26 Feb 2014 15:23:47 -0800
Subject: [PATCH] note to self

---
 file-tools.rkt | 1 +
 1 file changed, 1 insertion(+)

diff --git a/file-tools.rkt b/file-tools.rkt
index dff3313..b8dea56 100644
--- a/file-tools.rkt
+++ b/file-tools.rkt
@@ -140,6 +140,7 @@
              (pathish? . -> . path?)
              (->path (if (stem-source? x) x (add-ext x file-ext))))
            
+           ;; coerce either a source or output file to both
            (define+provide/contract (->stem-source+output-paths path)
              (pathish? . -> . (values path? path?))
              (values (->complete-path (->stem-source-path path))