Now allowing the alias of a module to refer to the alias of an ancestor.

3 files changed, 9 insertions, 9 deletions

diff --git a/stdlib/source/program/licentia.lux b/stdlib/source/program/licentia.lux
index 46fa8345f..0b7bca16f 100644
--- a/stdlib/source/program/licentia.lux
+++ b/stdlib/source/program/licentia.lux
@@ -32,9 +32,9 @@
    [world
     ["." file (#+ Path File)]]
    [host (#+ import:)]]
-  [/
-   ["/." input]
-   ["/." output]])
+  ["." / #_
+   ["#." input]
+   ["#." output]])
 
 (with-expansions [<expiry> (as-is "2019-04-01")]
   (to-do <expiry> "Replace _.work with _.covered-work or _.licensed-work")
diff --git a/stdlib/source/program/licentia/license.lux b/stdlib/source/program/licentia/license.lux
index c77718ce7..375ed8c12 100644
--- a/stdlib/source/program/licentia/license.lux
+++ b/stdlib/source/program/licentia/license.lux
@@ -1,8 +1,8 @@
 (.module:
   [lux #*]
-  [/
-   ["/." copyright]
-   [time (#+ Days Months Period)]])
+  ["." / #_
+   [time (#+ Days Months Period)]
+   ["#." copyright]])
 
 (type: #export Identification
   {#name Text
diff --git a/stdlib/source/program/licentia/license/notice.lux b/stdlib/source/program/licentia/license/notice.lux
index b16dfbc9e..b1cf5658e 100644
--- a/stdlib/source/program/licentia/license/notice.lux
+++ b/stdlib/source/program/licentia/license/notice.lux
@@ -5,9 +5,9 @@
      format]
     [collection
      ["." list ("#/." functor)]]]]
-  [//
-   ["//." time]
-   ["//." copyright]
+  ["." // #_
+   ["#." time]
+   ["#." copyright]
    ["_" term]
    [//
     ["$" document]]])