From cb8f2b36352948108446c7e3b270faa97589bf7a Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 25 Oct 2020 23:16:14 -0400
Subject: Some small refactoring.

---
 stdlib/source/program/scriptum.lux | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'stdlib/source/program/scriptum.lux')

diff --git a/stdlib/source/program/scriptum.lux b/stdlib/source/program/scriptum.lux
index bf12da1cd..1cb0ee21a 100644
--- a/stdlib/source/program/scriptum.lux
+++ b/stdlib/source/program/scriptum.lux
@@ -489,7 +489,7 @@
     (do io.monad
       [outcome (do (try.with io.monad)
                  [target (: (IO (Try (File IO)))
-                            (file.get-file io.monad file.system path))]
+                            (file.get-file io.monad file.default path))]
                  (!.use (:: target over-write) (encoding.to-utf8 (md.markdown documentation))))]
       (case outcome
         (#try.Failure error)
-- 
cgit v1.2.3