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/test/aedifex/command/pom.lux | 2 +-
 stdlib/source/test/aedifex/input.lux       | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'stdlib/source/test/aedifex')

diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux
index 1bb098de0..cd0eed8e9 100644
--- a/stdlib/source/test/aedifex/command/pom.lux
+++ b/stdlib/source/test/aedifex/command/pom.lux
@@ -33,7 +33,7 @@
   (<| (_.covering /._)
       (do random.monad
         [sample @profile.random
-         #let [fs (file.mock (:: file.system separator))]]
+         #let [fs (file.mock (:: file.default separator))]]
         (wrap (do {@ promise.monad}
                 [outcome (/.do! fs sample)]
                 (case outcome
diff --git a/stdlib/source/test/aedifex/input.lux b/stdlib/source/test/aedifex/input.lux
index 39a71eb81..50b99a218 100644
--- a/stdlib/source/test/aedifex/input.lux
+++ b/stdlib/source/test/aedifex/input.lux
@@ -34,7 +34,7 @@
       (do {@ random.monad}
         [expected (:: @ map (set@ #//.parents (list)) @profile.random)
          #let [fs (: (file.System Promise)
-                     (file.mock (:: file.system separator)))]]
+                     (file.mock (:: file.default separator)))]]
         (wrap (do promise.monad
                 [verdict (do //action.monad
                            [file (: (Promise (Try (File Promise)))
-- 
cgit v1.2.3