90 lines
2.1 KiB
Plaintext
90 lines
2.1 KiB
Plaintext
(*
|
|
Module: Test_Anaconda
|
|
Provides unit tests and examples for the <Anaconda> lens.
|
|
|
|
- 'exampleN' snippets are taken from the documentation:
|
|
https://anaconda-installer.readthedocs.io/en/latest/user-interaction-config-file-spec.html
|
|
- 'installedN' snippets are taken from the resulting files after
|
|
a successful installation
|
|
*)
|
|
|
|
module Test_Anaconda =
|
|
|
|
let example1 = "# comment example - before the section headers
|
|
|
|
[section_1]
|
|
# comment example - inside section 1
|
|
key_a_in_section1=some_value
|
|
key_b_in_section1=some_value
|
|
|
|
[section_2]
|
|
# comment example - inside section 2
|
|
key_a_in_section2=some_value
|
|
"
|
|
|
|
test Anaconda.lns get example1 =
|
|
{ "#comment" = "comment example - before the section headers" }
|
|
{ }
|
|
{ "section_1"
|
|
{ "#comment" = "comment example - inside section 1" }
|
|
{ "key_a_in_section1" = "some_value" }
|
|
{ "key_b_in_section1" = "some_value" }
|
|
{ }
|
|
}
|
|
{ "section_2"
|
|
{ "#comment" = "comment example - inside section 2" }
|
|
{ "key_a_in_section2" = "some_value" }
|
|
}
|
|
|
|
let example2 = "# this is the user interaction config file
|
|
|
|
[General]
|
|
post_install_tools_disabled=0
|
|
|
|
[DatetimeSpoke]
|
|
# the date and time spoke has been visited
|
|
visited=1
|
|
changed_timezone=1
|
|
changed_ntp=0
|
|
changed_timedate=1
|
|
|
|
[KeyboardSpoke]
|
|
# the keyboard spoke has not been visited
|
|
visited=0
|
|
"
|
|
|
|
test Anaconda.lns get example2 =
|
|
{ "#comment" = "this is the user interaction config file" }
|
|
{ }
|
|
{ "General"
|
|
{ "post_install_tools_disabled" = "0" }
|
|
{ }
|
|
}
|
|
{ "DatetimeSpoke"
|
|
{ "#comment" = "the date and time spoke has been visited" }
|
|
{ "visited" = "1" }
|
|
{ "changed_timezone" = "1" }
|
|
{ "changed_ntp" = "0" }
|
|
{ "changed_timedate" = "1" }
|
|
{ }
|
|
}
|
|
{ "KeyboardSpoke"
|
|
{ "#comment" = "the keyboard spoke has not been visited" }
|
|
{ "visited" = "0" }
|
|
}
|
|
|
|
let installed1 = "# This file has been generated by the Anaconda Installer 21.48.22.134-1
|
|
|
|
[ProgressSpoke]
|
|
visited = 1
|
|
|
|
"
|
|
|
|
test Anaconda.lns get installed1 =
|
|
{ "#comment" = "This file has been generated by the Anaconda Installer 21.48.22.134-1" }
|
|
{ }
|
|
{ "ProgressSpoke"
|
|
{ "visited" = "1" }
|
|
{ }
|
|
}
|