- open (my $configfile, "> " . "kiriwrite.xml");
-
- print $configfile "<?xml version=\"1.0\"?>
-
-<kiriwrite-config>
-<!-- This file was automatically generated by Kiriwrite, please feel free to edit to your own needs. -->
- <settings>
- <directories>
- <database>" . $passedsettings->{DatabaseDirectory} . "</database>
- <output>" . $passedsettings->{OutputDirectory} . "</output>
- <images>" . $passedsettings->{ImagesURIPath} . "</images>
- </directories>
- <language>
- <lang>" . $passedsettings->{Language} . "</lang>
- </language>
- <system>
- <presentation>" . $passedsettings->{PresentationModule} . "</presentation>
- <database>" . $passedsettings->{DatabaseModule} . "</database>
- <datetime>" . $passedsettings->{DateFormat} . "</datetime>
- </system>
- <database>
- <server>" . $passedsettings->{DatabaseServer} . "</server>
- <port>" . $passedsettings->{DatabasePort} . "</port>
- <protocol>" . $passedsettings->{DatabaseProtocol} . "</protocol>
- <database>" . $passedsettings->{DatabaseName} . "</database>
- <username>" . $passedsettings->{DatabaseUsername} . "</username>
- <password>" . $passedsettings->{DatabasePassword} . "</password>
- <prefix>" . $passedsettings->{DatabaseTablePrefix} . "</prefix>
- </database>
- </settings>
-</kiriwrite-config>
+ open (my $configfile, "> " . "kiriwrite.cfg");
+
+ print $configfile "[config]
+ directory_data_db = $passedsettings->{DatabaseDirectory}
+ directory_data_output = $passedsettings->{OutputDirectory}
+ directory_noncgi_images = $passedsettings->{ImagesURIPath}
+
+ system_language = $passedsettings->{Language}
+ system_presmodule = $passedsettings->{PresentationModule}
+ system_dbmodule = $passedsettings->{DatabaseModule}
+ system_datetime = $passedsettings->{DateFormat}
+
+ display_textareacols = $passedsettings->{TextAreaCols}
+ display_textarearows = $passedsettings->{TextAreaRows}
+
+ database_server = $passedsettings->{DatabaseServer}
+ database_port = $passedsettings->{DatabasePort}
+ database_protocol = $passedsettings->{DatabaseProtocol}
+ database_sqldatabase = $passedsettings->{DatabaseName}
+ database_username = $passedsettings->{DatabaseUsername}
+ database_password = $passedsettings->{DatabasePassword}
+ database_tableprefix = $passedsettings->{DatabaseTablePrefix}