X-Git-Url: http://Server1/repobrowser/?a=blobdiff_plain;f=cgi-files%2Finstall.cgi;h=48acdfb5e7907d40880da233da98f4bbebce60a8;hb=c50d1eaadbb17830fcaf3258dd39d7b25599ff3e;hp=4aadeb9d1cfda22034224ff642ae12366ffa1bbe;hpb=59e77b42d011947728337c1d72b20c8c26546f05;p=kiriwrite%2F.git

diff --git a/cgi-files/install.cgi b/cgi-files/install.cgi
index 4aadeb9..48acdfb 100755
--- a/cgi-files/install.cgi
+++ b/cgi-files/install.cgi
@@ -1,4 +1,4 @@
-#!/opt/perl-5.9.5/bin/perl5.9.5 -Tw
+#!/usr/bin/perl -Tw
 
 #################################################################################
 # Kiriwrite Installer Script (install.cgi)					#
@@ -26,7 +26,7 @@ use warnings;				# Write warnings to the HTTP Server Log file.
 
 use utf8;
 use CGI qw(:standard *table *Tr *td);
-use CGI::Carp('fatalsToBrowser'); 	# Output errors to the browser.
+#use CGI::Carp('fatalsToBrowser'); 	# Output errors to the browser.
 
 # Setup strings in specific languages. Style should be no spacing for
 # language title and one tabbed spacing for each string.
@@ -219,6 +219,7 @@ body {
 }
 
 input {
+	font-size: 12px;
 	background-color: #408080;
 	color: #FFFFFF;
 	border-color: #102020;
@@ -229,6 +230,7 @@ input {
 }
 
 select {
+	font-size: 12px;
 	padding: 3px;
 	background-color: #408080;
 	color: #FFFFFF;
@@ -1597,6 +1599,10 @@ $test_list{CheckXMLSimple}{Name} 	= "XML::Simple";
 $test_list{CheckXMLSimple}{Type}	= "dependency";
 $test_list{CheckXMLSimple}{Code}	= "XML::Simple";
 
+$test_list{CheckXMLParser}{Name} 	= "XML::Parser";
+$test_list{CheckXMLParser}{Type}	= "dependency";
+$test_list{CheckXMLParser}{Code}	= "XML::Parser";
+
 $test_list{CheckTieHash}{Name}		= "Tie::IxHash";
 $test_list{CheckTieHash}{Type} 		= "dependency";
 $test_list{CheckTieHash}{Code} 		= "Tie::IxHash";
@@ -2127,7 +2133,7 @@ print start_td({ -class => "tablename" });
 print $kiriwrite_lang{$language_selected}{presentationmodule};
 print end_td();
 print start_td({ -class => "tabledata" });
-print popup_menu({ -name => 'presmodule', -values => $presentation_modules_ref });
+print popup_menu({ -name => 'presmodule', -values => $presentation_modules_ref, -default => "HTML4S" });
 print end_td();
 print end_Tr();
 
@@ -2136,7 +2142,7 @@ print start_td({ -class => "tablename" });
 print $kiriwrite_lang{$language_selected}{databasemodule};
 print end_td();
 print start_td({ -class => "tabledata" });
-print popup_menu({ -name => 'dbmodule', -values => $database_modules_ref });
+print popup_menu({ -name => 'dbmodule', -values => $database_modules_ref, -default => "SQLite" });
 print end_td();
 print end_Tr();