diff options
Diffstat (limited to 'stdlib/source/test/aedifex/repository')
-rw-r--r-- | stdlib/source/test/aedifex/repository/identity.lux | 4 | ||||
-rw-r--r-- | stdlib/source/test/aedifex/repository/local.lux | 10 | ||||
-rw-r--r-- | stdlib/source/test/aedifex/repository/origin.lux | 4 | ||||
-rw-r--r-- | stdlib/source/test/aedifex/repository/remote.lux | 10 |
4 files changed, 14 insertions, 14 deletions
diff --git a/stdlib/source/test/aedifex/repository/identity.lux b/stdlib/source/test/aedifex/repository/identity.lux index 5e357ecca..e1b67e424 100644 --- a/stdlib/source/test/aedifex/repository/identity.lux +++ b/stdlib/source/test/aedifex/repository/identity.lux @@ -13,8 +13,8 @@ (def: .public random (Random /.Identity) (all random.and - (random.ascii/alpha 10) - (random.ascii/alpha 10) + (random.alphabetic 10) + (random.alphabetic 10) )) (def: .public test diff --git a/stdlib/source/test/aedifex/repository/local.lux b/stdlib/source/test/aedifex/repository/local.lux index c5da9011d..92826c8ff 100644 --- a/stdlib/source/test/aedifex/repository/local.lux +++ b/stdlib/source/test/aedifex/repository/local.lux @@ -27,16 +27,16 @@ Test (<| (_.covering /._) (do [! random.monad] - [/ (random.ascii/upper 1) - home (random.ascii/lower 10) - working_directory (random.ascii/lower 10) + [/ (random.upper_case 1) + home (random.lower_case 10) + working_directory (random.lower_case 10) .let [fs (file.mock /) program (program.async (program.mock environment.empty home working_directory)) repo (/.repository program fs)] - uri (random.ascii/lower 10) + uri (random.lower_case 10) expected (# ! each (# utf8.codec encoded) - (random.ascii/lower 10))] + (random.lower_case 10))] (all _.and (in (do async.monad [before_upload (# repo download uri) diff --git a/stdlib/source/test/aedifex/repository/origin.lux b/stdlib/source/test/aedifex/repository/origin.lux index a0bcff68d..90a0f89dd 100644 --- a/stdlib/source/test/aedifex/repository/origin.lux +++ b/stdlib/source/test/aedifex/repository/origin.lux @@ -13,8 +13,8 @@ (def: .public random (Random /.Origin) (all random.or - (random.ascii/alpha 10) - (random.ascii/alpha 10) + (random.alphabetic 10) + (random.alphabetic 10) )) (def: .public test diff --git a/stdlib/source/test/aedifex/repository/remote.lux b/stdlib/source/test/aedifex/repository/remote.lux index abf123f4b..05cd293c3 100644 --- a/stdlib/source/test/aedifex/repository/remote.lux +++ b/stdlib/source/test/aedifex/repository/remote.lux @@ -84,14 +84,14 @@ Test (<| (_.covering /._) (do [! random.monad] - [address (random.ascii/upper 10) - uri (random.ascii/lower 10) + [address (random.upper_case 10) + uri (random.lower_case 10) - user (random.ascii/lower 10) - password (random.ascii/lower 10) + user (random.lower_case 10) + password (random.lower_case 10) content (# ! each (# utf8.codec encoded) - (random.ascii/lower 10))] + (random.lower_case 10))] (all _.and (_.cover [/.repository /.user_agent /.Address] (let [repo (/.repository (..good_http user password) |