From b0914546f8e8ea5ef970c1f92dbb0072aa22be63 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 20 Jul 2018 23:43:59 -0400
Subject: "^open" and "open:" now use aliases instead of prefixes, the same way
 as module aliases.

---
 stdlib/source/lux/data/format/json.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'stdlib/source/lux/data/format/json.lux')

diff --git a/stdlib/source/lux/data/format/json.lux b/stdlib/source/lux/data/format/json.lux
index 764beab83..79510cb5c 100644
--- a/stdlib/source/lux/data/format/json.lux
+++ b/stdlib/source/lux/data/format/json.lux
@@ -6,19 +6,19 @@
     ["." monad (#+ do Monad)]
     [equivalence (#+ Equivalence)]
     codec
-    ["p" parser ("parser/" Monad<Parser>)]]
+    ["p" parser ("parser/." Monad<Parser>)]]
    [data
     ["." bit]
     ["." maybe]
     ["e" error]
     ["." sum]
     ["." product]
-    ["." number ("frac/" Codec<Text,Frac>) ("nat/" Codec<Text,Nat>)]
-    ["." text ("text/" Equivalence<Text> Monoid<Text>)
+    ["." number ("frac/." Codec<Text,Frac>) ("nat/." Codec<Text,Nat>)]
+    ["." text ("text/." Equivalence<Text> Monoid<Text>)
      ["l" lexer]]
     [collection
-     ["." list ("list/" Fold<List> Monad<List>)]
-     ["." row (#+ Row row) ("row/" Monad<Row>)]
+     ["." list ("list/." Fold<List> Monad<List>)]
+     ["." row (#+ Row row) ("row/." Monad<Row>)]
      ["dict" dictionary (#+ Dictionary)]]]
    ["." macro (#+ Monad<Meta> with-gensyms)
     ["s" syntax (#+ syntax:)]
@@ -61,7 +61,7 @@
               (json ["this" "is" "an" "array"])
               (json {"this" "is"
                      "an" "object"}))}
-  (let [(^open) Monad<Meta>
+  (let [(^open ".") Monad<Meta>
         wrapper (function (_ x) (` (..json (~ x))))]
     (case token
       (^template [<ast-tag> <ctor> <json-tag>]
-- 
cgit v1.2.3