From 1c93f003f73116202b1f964b0d1b6d3f07b69fb0 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Tue, 14 Sep 2021 02:01:49 -0400 Subject: No more "^slots". --- stdlib/source/program/aedifex/metadata/snapshot.lux | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'stdlib/source/program/aedifex/metadata/snapshot.lux') diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux index 943bf6004..fe9a2e6a0 100644 --- a/stdlib/source/program/aedifex/metadata/snapshot.lux +++ b/stdlib/source/program/aedifex/metadata/snapshot.lux @@ -69,15 +69,15 @@ [version_format Version .. (|>)] ) -(def: .public (format (^slots [#artifact #versioning])) +(def: .public (format (^open "[0]")) (-> Metadata XML) - (let [(^slots [///artifact.#group ///artifact.#name ///artifact.#version]) artifact] + (let [(^open "[0]") #artifact] {xml.#Node .. xml.attributes (list (..group_format group) (..name_format name) (..version_format version) - (///artifact/versioning.format versioning))})) + (///artifact/versioning.format #versioning))})) (def: (text tag) (-> xml.Tag (Parser Text)) -- cgit v1.2.3