### ----------------------------------------------------
### -- XML
### -- Licenses: Artistic-2.0
### -- Authors: Timothy Totten
### -- File: t/make.rakutest
### ----------------------------------------------------
use Test;

use XML;

plan 1;

my $xml = make-xml('test', :type<embedded>,
  \('hello', :lang<en>, "world"),
  \('aurevoir', :lang<fr>, "univers")
);

is ~$xml, '<test type="embedded"><hello lang="en">world</hello><aurevoir lang="fr">univers</aurevoir></test>', 'make-xml worked.';

# vim: expandtab shiftwidth=4


